Condition Coverage

blib/lib/Mail/Message/Field.pm
Criterion Covered Total %
condition 26 33 78.7


and 3 conditions

line !l l&&!r l&&r condition
169 87 381 4 CORE::length $r and substr($r, -1) eq "\\"
344 4 80 $s eq "(" and not $in_dquotes
266 2 80 $s eq ")" and not $in_dquotes
199 0 0 2 defined $comment and CORE::length $comment

or 3 conditions

line l !l&&r !l&&!r condition
76 21 0 0 shift() || select()
86 5 0 0 shift() || $default_wrap_length
242 24 1 84 s/\b$attr\s*=\s*"(?>[^\\"]|\\.){0,1000}"/$attr="$quoted"/i or s/\b$attr\s*=\s*[^;\s]*/$attr="$quoted"/i
389 6 1 6 $obj->isa("Mail::Identity") or $obj->isa("User::Identity")
441 12 915 0 shift() || $default_wrap_length
453 21 30 4 $line =~ s/^ ( .{$min,$max} # $max to 30 chars [;,] # followed at a ; or , )[ \t] # and then a WSP //x or $line =~ s/^ ( .{$min,$max} ) # $max to 30 chars [ \t] # followed by a WSP //x
51 1 3 $line =~ s/^ ( .{$min,$max} # $max to 30 chars [;,] # followed at a ; or , )[ \t] # and then a WSP //x or $line =~ s/^ ( .{$min,$max} ) # $max to 30 chars [ \t] # followed by a WSP //x or $line =~ s/^ ( .{$max,}? ) # longer, but minimal chars [ \t] # followed by a WSP //x