Condition Coverage

blib/lib/Mail/Header.pm
Criterion Covered Total %
condition 36 82 43.9


and 3 conditions

line !l l&&!r l&&r condition
86 0 5 9 $_[0] =~ /^([-\w]+)/ and exists $STRUCTURE{lc $1}
144 0 23 2 defined $tag and $tag =~ /^From /io
23 2 0 defined $tag and $tag =~ /^From /io and $self->{'mail_hdr_mail_from'} ne 'KEEP'
163 0 0 25 defined $ctag and $ctag =~ /^($FIELD_NAME|From )/io
167 0 19 6 defined $ctag and $modify || !($line =~ /^\Q$ctag\E/i)
176 16 0 9 $modify and defined $maxlen
208 0 6 18 $def and $where
287 4 15 5 @$lines and $lines->[0] =~ /^[ \t]+/
308 0 0 0 defined $ln and defined $line
0 0 0 defined $ln and defined $line and $ln =~ /^[ \t]+/
452 0 0 0 defined $ln and defined $$ln
461 0 0 6 defined $ln and defined $$ln
474 0 0 6 defined $tag and defined $line
496 0 0 0 defined $tag and defined $line
500 0 0 0 $field and defined $field->[$idx]
515 0 0 0 $tag =~ /^From /io and $self->{'mail_hdr_mail_from'} ne 'KEEP'

or 2 conditions

line l !l condition
204 8 16 $self->{'mail_hdr_hash'}{$tag} ||= []
239 2 9 delete $opt{'Modify'} || 0
513 0 0 shift() || ' '
546 11 9 $idx ||= 0
600 0 1 shift() || \*STDOUT

or 3 conditions

line l !l&&r !l&&!r condition
138 0 9 16 $modify ||= $self->{'mail_hdr_modify'}
167 9 6 10 $modify || !($line =~ /^\Q$ctag\E/i)
173 0 25 0 $self->{'mail_hdr_lengths'}{$tag} || $HDR_LENGTHS{$tag} || $self->fold_length
229 0 11 0 ref $call || $call
244 0 11 0 $opt{'MailFrom'} || $MAIL_FROM
320 0 0 0 not defined $ln or $ln =~ /^\r?$/
430 0 0 0 $maxlen || $self->{'mail_hdr_lengths'}{$tag} || $HDR_LENGTHS{$tag} || $self->fold_length
545 16 4 3 defined $idx or not wantarray