| line |
true |
false |
branch |
|
199
|
0 |
118 |
if $NOCACHE |
|
203
|
2 |
116 |
if exists $PARSE_CACHE{$line} |
|
208
|
0 |
116 |
if $NOCACHE |
|
217
|
1 |
118 |
unless $line |
|
219
|
118 |
0 |
if $COLLAPSE_SPACES |
|
221
|
2 |
116 |
if (my(@cached) = $class->__get_cached_parse($line)) |
|
227
|
109 |
7 |
if $str =~ /$angle_addr/ |
|
237
|
4 |
240 |
if @comments |
|
240
|
198 |
46 |
if s/<($local_part)\@($domain)>\s*\z//o |
|
241
|
46 |
198 |
unless (defined $user and defined $host) |
|
246
|
4 |
240 |
if $user =~ /\P{ASCII}/ |
|
247
|
1 |
239 |
if $host =~ /\P{ASCII}/ |
|
252
|
76 |
651 |
unless defined $_ |
|
255
|
0 |
651 |
unless length $_ |
|
258
|
163 |
76 |
if $phrase |
|
285
|
477 |
216 |
if $phrase |
|
391
|
1 |
228 |
if ($_[1]) { } |
|
392
|
1 |
0 |
if ($_[0][4]) |
|
422
|
1680 |
334 |
if exists $FORMAT_CACHE{$cache_str} |
|
429
|
86 |
1 |
unless (defined $self->[0] and length $self->[0] or defined $self->[2] and length $self->[2]) |
|
434
|
85 |
1 |
defined $self->[1] ? : |
|
437
|
163 |
85 |
defined $self->[2] ? : |
|
438
|
3 |
245 |
if length $comment and not $comment =~ /\A\(.*\)\z/ |
|
440
|
248 |
0 |
defined $self->[1] ? : |
|
456
|
1 |
247 |
unless defined $phrase and length $phrase |
|
459
|
1 |
246 |
if $phrase =~ /\A=\?.+\?=\z/ |
|
484
|
349 |
314 |
if exists $NAME_CACHE{$cache_str} |
|
488
|
233 |
81 |
if ($name = $self->[0]) { } |
|
|
0 |
81 |
elsif ($name = $self->[2]) { } |
|
533
|
0 |
669 |
if $STRINGIFY ne 'format' |