Condition Coverage

blib/lib/MIME/Explode.pm
Criterion Covered Total %
condition 0 101 0.0


and 2 conditions

line l !l condition
107 0 0 exists $$self{'exclude_types'} and scalar @{$$self{'exclude_types'};}

and 3 conditions

line !l l&&!r l&&r condition
140 0 0 0 not $mbox and $base eq '0'
0 0 0 not $mbox and $base eq '0' and /$patterns[4]/o
151 0 0 0 $key eq 'subject' and $_[0]{$tree}{$key} =~ /\?\=$/o
156 0 0 0 exists $h_hash{$key} and exists $_[0]{$tree}{$key}{'value'}
0 0 0 $key eq 'subject' and $$args{'decode_subject'}
179 0 0 0 not $checkhdr and length $_ <= 2
0 0 0 not $checkhdr and length $_ <= 2 and /$patterns[2]/o
181 0 0 0 exists $_[0]{$tree}{'content-type'} and exists $_[0]{$tree}{'content-type'}{'value'}
183 0 0 0 exists $_[0]{$tree}{'content-type'}{'boundary'} and $_[0]{$tree}{'content-type'}{'value'} =~ m[multipart/\w+]o
218 0 0 0 exists $_[0]{$tree}{'content-type'} and exists $_[0]{$tree}{'content-type'}{'value'}
222 0 0 0 exists $_[0]{$tree}{'content-transfer-encoding'} and exists $_[0]{$tree}{'content-transfer-encoding'}{'value'}
225 0 0 0 $_[0]{$tree}{'content-transfer-encoding'}{'value'} eq 'quoted-printable' and $boundary
247 0 0 0 $mbox and /$patterns[4]/o
0 0 0 $mbox and /$patterns[4]/o and scalar @{[split(/\./o, $tree, 0)];} > 2
255 0 0 0 $mbox and /$patterns[4]/o
267 0 0 0 length $_ <= 2 && /$patterns[2]/o
272 0 0 0 $mbox and scalar @{[split(/\./o, $tree, 0)];} == 2
291 0 0 0 not $exclude and $ph
292 0 0 0 $check_ctype and $$args{'check_ctype'}
321 0 0 0 not $ftmp and length $_ <= 2
0 0 0 not $ftmp and length $_ <= 2 and /$patterns[2]/o

or 2 conditions

line l !l condition
100 0 0 $$self{'check_content_type'} || 0
125 0 0 shift() || 0
126 0 0 shift() || '0'
127 0 0 shift() || ''
204 0 0 $1 || '644'
229 0 0 $_[0]{$tree}{'content-type'}{'value'} || ''
295 0 0 $_[0]{$tree}{'content-type'}{'value'} ||= ''
361 0 0 shift @{$params;} || ''
377 0 0 $content_type{$ctype} || ''

or 3 conditions

line l !l&&r !l&&!r condition
55 0 0 0 ref $proto || $proto
72 0 0 0 -d $$self{'output_dir'} or not $$self{'mkdir'}
170 0 0 0 $key eq 'received' or $key eq 'x-received'
219 0 0 0 $_[0]{$tree}{'content-type'}{'value'} =~ m[^multipart/\w+$]o or $_[0]{$tree}{'content-type'}{'value'} eq 'message/rfc822'
225 0 0 0 $_[0]{$tree}{'content-transfer-encoding'}{'value'} eq 'base64' or $_[0]{$tree}{'content-transfer-encoding'}{'value'} eq 'quoted-printable' and $boundary
268 0 0 0 defined $fh or not $tmp