| line |
true |
false |
branch |
|
55
|
0 |
1 |
unless open INPUT, $inputFile |
|
57
|
0 |
1 |
unless open OUTPUT, ">$outputFile" |
|
70
|
1 |
10 |
if (/^N;/) |
|
83
|
2 |
9 |
if (/^ADR;/) |
|
96
|
2 |
9 |
if (/^EMAIL;INTERNET;/) |
|
106
|
4 |
7 |
if (/^TEL;/) |
|
116
|
0 |
11 |
if (/^ORG;/) |
|
126
|
1 |
10 |
if (/^URL;/) |
|
136
|
0 |
11 |
if (/^NOTE;/) |
|
144
|
0 |
11 |
if ($NotesStarted) |
|
149
|
0 |
0 |
unless ($_ =~ /=$/) |
|
155
|
1 |
10 |
if (/END:VCARD/) |
|
161
|
0 |
1 |
if (not defined $data{join $;, $id, 'First name'} || defined $data{join $;, $id, 'Last name'}) { } |
|
168
|
1 |
0 |
if (defined $data{join $;, $id, 'First name'}) |
|
170
|
1 |
0 |
if (defined $data{join $;, $id, 'Middle name'} or defined $data{join $;, $id, 'Last name'}) |
|
175
|
1 |
0 |
if (defined $data{join $;, $id, 'Middle name'}) |
|
177
|
1 |
0 |
if (defined $data{join $;, $id, 'Last name'}) |
|
181
|
1 |
0 |
if (defined $data{join $;, $id, 'Last name'}) |
|
189
|
0 |
0 |
if (defined $data{join $;, $id, 'Last name'} or defined $data{join $;, $id, 'Middle name'} or defined $data{join $;, $id, 'First name'}) |
|
194
|
1 |
0 |
if (defined $data{join $;, $id, 'Last name'}) |
|
198
|
1 |
0 |
if (defined $data{join $;, $id, 'First name'}) |
|
202
|
1 |
0 |
if (defined $data{join $;, $id, 'Middle name'}) |
|
206
|
1 |
0 |
if (defined $data{join $;, $id, 'Suffix'}) |
|
210
|
1 |
0 |
if (defined $data{join $;, $id, 'Suffix'}) |
|
218
|
1 |
0 |
if (defined $data{join $;, $id, 'Work address'}) |
|
220
|
1 |
0 |
if (defined $data{join $;, $id, 'Work PO box'}) |
|
224
|
1 |
0 |
if (defined $data{join $;, $id, 'Work ext address'}) |
|
228
|
1 |
0 |
if (defined $data{join $;, $id, 'Work address'}) |
|
232
|
1 |
0 |
if (defined $data{join $;, $id, 'Work city'}) |
|
236
|
1 |
0 |
if (defined $data{join $;, $id, 'Work region'}) |
|
240
|
1 |
0 |
if (defined $data{join $;, $id, q[Work p'code]}) |
|
244
|
0 |
1 |
if (defined $data{join $;, $id, 'Work country'}) |
|
252
|
1 |
0 |
if (defined $data{join $;, $id, 'Home address'}) |
|
254
|
1 |
0 |
if (defined $data{join $;, $id, 'Home PO box'}) |
|
258
|
1 |
0 |
if (defined $data{join $;, $id, 'Home ext address'}) |
|
262
|
1 |
0 |
if (defined $data{join $;, $id, 'Home address'}) |
|
266
|
1 |
0 |
if (defined $data{join $;, $id, 'Home city'}) |
|
270
|
1 |
0 |
if (defined $data{join $;, $id, 'Home region'}) |
|
274
|
1 |
0 |
if (defined $data{join $;, $id, q[Home p'code]}) |
|
278
|
1 |
0 |
if (defined $data{join $;, $id, 'Home country'}) |
|
286
|
1 |
0 |
if (defined $data{join $;, $id, 'Work tel'} or defined $data{join $;, $id, 'Home tel'}) |
|
288
|
1 |
0 |
if (defined $data{join $;, $id, 'Home tel'}) |
|
291
|
1 |
0 |
if (defined $data{join $;, $id, 'Work tel'}) |
|
294
|
1 |
0 |
if (defined $data{join $;, $id, 'Mobile'}) |
|
301
|
1 |
0 |
if (defined $data{join $;, $id, 'Work email'} or defined $data{join $;, $id, 'Home email'}) |
|
303
|
1 |
0 |
if (defined $data{join $;, $id, 'Work email'}) |
|
306
|
1 |
0 |
if (defined $data{join $;, $id, 'Home email'}) |
|
313
|
1 |
0 |
if (defined $data{join $;, $id, 'Web page'}) |
|
319
|
0 |
1 |
if (defined $data{join $;, $id, 'Notes'}) |