line |
true |
false |
branch |
99
|
0 |
113 |
if $NOCACHE |
103
|
2 |
111 |
if exists $Email::Address::Loose::EmailAddress::PARSE_CACHE{$line} |
108
|
0 |
111 |
if $NOCACHE |
117
|
110 |
4 |
if $class eq 'Email::Address' |
119
|
1 |
113 |
unless $line |
121
|
113 |
0 |
if $Email::Address::Loose::EmailAddress::COLLAPSE_SPACES |
123
|
2 |
111 |
if (my(@cached) = $class->__get_cached_parse($line)) |
133
|
1 |
230 |
if @comments |
136
|
187 |
44 |
if s/<($local_part)\@($domain)>//o |
137
|
44 |
187 |
unless (defined $user and defined $host) |
145
|
77 |
617 |
unless defined $_ |
148
|
0 |
617 |
unless length $_ |
164
|
154 |
77 |
if $phrase |
200
|
1 |
10 |
if ($_[1]) { } |
201
|
1 |
0 |
if ($_[0][4]) |
221
|
660 |
222 |
if exists $Email::Address::Loose::EmailAddress::FORMAT_CACHE{"@{$_[0];}"} |
228
|
68 |
0 |
unless (defined $$self[0] and length $$self[0] or defined $$self[2] and length $$self[2]) |
251
|
0 |
154 |
if $phrase =~ /\A=\?.+\?=\z/ |
262
|
0 |
220 |
if exists $Email::Address::Loose::EmailAddress::NAME_CACHE{"@{$_[0];}"} |
265
|
152 |
68 |
if ($name = $$self[0]) { } |
|
0 |
68 |
elsif ($name = $$self[2]) { } |
282
|
0 |
660 |
if $Email::Address::Loose::EmailAddress::STRINGIFY ne 'format' |