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
82 0 5 9 $_[0] =~ /^([-\w]+)/ and exists $STRUCTURE{lc $1}
140 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'
159 0 0 25 defined $ctag and $ctag =~ /^($FIELD_NAME|From )/io
163 0 19 6 defined $ctag and $modify || !($line =~ /^\Q$ctag\E/i)
172 16 0 9 $modify and defined $maxlen
204 0 6 18 $def and $where
283 4 15 5 @$lines and $lines->[0] =~ /^[ \t]+/
304 0 0 0 defined $ln and defined $line
0 0 0 defined $ln and defined $line and $ln =~ /^[ \t]+/
448 0 0 0 defined $ln and defined $$ln
457 0 0 6 defined $ln and defined $$ln
470 0 0 6 defined $tag and defined $line
492 0 0 0 defined $tag and defined $line
496 0 0 0 $field and defined $field->[$idx]
511 0 0 0 $tag =~ /^From /io and $self->{'mail_hdr_mail_from'} ne 'KEEP'

or 2 conditions

line l !l condition
200 8 16 $self->{'mail_hdr_hash'}{$tag} ||= []
235 2 9 delete $opt{'Modify'} || 0
509 0 0 shift() || ' '
542 11 9 $idx ||= 0
596 0 1 shift() || \*STDOUT

or 3 conditions

line l !l&&r !l&&!r condition
134 0 9 16 $modify ||= $self->{'mail_hdr_modify'}
163 9 6 10 $modify || !($line =~ /^\Q$ctag\E/i)
169 0 25 0 $self->{'mail_hdr_lengths'}{$tag} || $HDR_LENGTHS{$tag} || $self->fold_length
225 0 11 0 ref $call || $call
240 0 11 0 $opt{'MailFrom'} || $MAIL_FROM
316 0 0 0 not defined $ln or $ln =~ /^\r?$/
426 0 0 0 $maxlen || $self->{'mail_hdr_lengths'}{$tag} || $HDR_LENGTHS{$tag} || $self->fold_length
541 16 4 3 defined $idx or not wantarray