Condition Coverage

blib/lib/Mail/Address.pm
Criterion Covered Total %
condition 48 64 75.0


and 3 conditions

line !l l&&!r l&&r condition
26 0 5 44 @_ && ref $_[0]
52 7 2 29 /[A-Z]/ and /[a-z]/
211 0 26 18 defined $phrase and length $phrase
0 0 26 defined $email and length $email
217 0 0 18 defined $email and length $email
224 0 28 16 defined $comment and $comment =~ /\S/
229 0 28 16 defined $comment and length $comment
246 0 26 18 defined $phrase and length $phrase
252 33 7 4 $name eq '' and $addr =~ /([^\%\.\@_]+([\._][^\%\.\@_]+)+)[\@\%]/
257 37 6 1 $name eq '' and $addr =~ m[/g=]i

or 2 conditions

line l !l condition
268 0 0 (shift())->address || ''
275 0 0 (shift())->address || ''

or 3 conditions

line l !l&&r !l&&!r condition
99 10 0 409 s/^("(?:[^"\\]+|\\.)*")\s*// or s/^(\[(?:[^\]\\]+|\\.)*\])\s*//
10 218 191 s/^("(?:[^"\\]+|\\.)*")\s*// or s/^(\[(?:[^\]\\]+|\\.)*\])\s*// or s/^([^\s()<>\@,;:\\".[\]]+)\s*//
218 191 0 s/^("(?:[^"\\]+|\\.)*")\s*// or s/^(\[(?:[^\]\\]+|\\.)*\])\s*// or s/^([^\s()<>\@,;:\\".[\]]+)\s*// or s/^([()<>\@,;:\\".[\]])\s*//
120 27 1 276 $c eq ',' or $c eq ';'
28 20 256 $c eq ',' or $c eq ';' or $c eq '<'
130 19 16 16 @$phrase or @$comment
35 16 0 @$phrase or @$comment or @$address
162 47 1 375 $_ eq ',' or $_ eq ';'
88 27 91 /^[.\@:;]$/ or not @address
115 88 3 /^[.\@:;]$/ or not @address or $address[-1] =~ /^[.\@:;]$/