line |
true |
false |
branch |
269
|
226 |
0 |
@_ % 2 ? : |
279
|
1003 |
629 |
if ($line =~ s/^(?:($RE{'cfws'})?,)//o) |
281
|
0 |
400 |
if $1 and not $args{'skip_comments'} and $1 =~ /($RE{'comment'})/ |
293
|
0 |
629 |
if (not $in_group and $line =~ s/^($RE{'display-name'})://o) |
295
|
0 |
0 |
unless $args{'skip_groups'} |
298
|
0 |
629 |
if ($in_group and $line =~ s/^;//) |
299
|
0 |
0 |
unless $args{'skip_groups'} |
310
|
624 |
5 |
if ($line =~ s/^($CRE{'mailbox'})($RE{'cfws'}*)(?=,|;|$)//o or $line =~ s/^($CRE{'obs-mailbox'})($RE{'cfws'}*)(?=,|;|$)//o and $obsolete = 1) |
316
|
0 |
624 |
"$user\@$host" =~ /\P{ASCII}/ ? : |
317
|
0 |
0 |
if $not_ascii and $args{'skip_not_ascii'} |
333
|
0 |
5 |
if ($in_group) { } |
334
|
0 |
0 |
if ($line =~ s/^([^;,"\)]*+(?:(?:$RE{'quoted-string'}|$RE{'comment'})[^;,"\)]*+)*+)(?=;|,)//o) |
335
|
0 |
0 |
unless $args{'skip_unknown'} |
339
|
2 |
3 |
if ($line =~ s/^([^,"\)]*+(?:(?:$RE{'quoted-string'}|$RE{'comment'})[^,"\)]*+)*+)(?=,)//o) |
340
|
2 |
0 |
unless $args{'skip_unknown'} |
344
|
3 |
0 |
unless $args{'skip_unknown'} |
368
|
614 |
108 |
$comments[-1] =~ /^\s|\s$/ ? : |
|
139 |
722 |
$1 ? : |
370
|
1680 |
1748 |
unless length $_ |
377
|
104 |
344 |
$1 ? : |
379
|
35 |
250 |
$1 ? : |
385
|
0 |
624 |
unless $user =~ /^$RE{'dot_atom'}$/ |