Condition Coverage

blib/lib/Email/MIME.pm
Criterion Covered Total %
condition 53 76 69.7


and 3 conditions

line !l l&&!r l&&r condition
274 40 0 14 $args{'parts'} and @{$args{'parts'};}
347 0 29 26 not $self->force_decode_hook and $cte =~ /$NO_ENCODE_RE/u
372 1 1 0 $self->{'ct'}{'type'} eq "text" and $self->{'ct'}{'subtype'} eq 'plain' || $self->{'ct'}{'subtype'} eq 'html'
394 0 41 0 $MAX_DEPTH and $DEPTH > $MAX_DEPTH
402 0 0 41 length $boundary and $self->body_raw =~ /^--\Q$boundary\E\s*$/msu
421 0 41 0 $MAX_PARTS and $CUR_PARTS > $MAX_PARTS
474 0 0 2 $type && ($type->extensions)[0]

or 2 conditions

line l !l condition
138 138 26 $arg ||= {}
299 145 0 $self->{'mycrlf'} || "\n"
339 55 51 $self->header('Content-Transfer-Encoding') || ''
392 11 30 our $DEPTH ||= 0
410 41 0 $body || ''
418 37 4 $bits[0] || ''
445 5 2 $level ||= 0
447 6 1 $self->content_type || ''
459 1 3 $self->header_raw('Content-Disposition') || ''
475 2 0 $ext ||= "dat"
646 51 8 $enc ||= "7bit"
680 294 1 (caller 1)[3] || ''
725 8 0 $dis ||= "inline"
916 4 5 $part->header("Content-ID") // ""

or 3 conditions

line l !l&&r !l&&!r condition
324 41 0 152 $self->{'ct'}{'type'} eq "multipart" or $self->{'ct'}{'type'} eq "message"
364 236 0 1 $_[0]{'body_raw'} || $_[0]->SUPER::body
372 1 0 0 $self->{'ct'}{'subtype'} eq 'plain' || $self->{'ct'}{'subtype'} eq 'html'
462 1 1 2 $attrs->{'filename'} || $self->{'ct'}{'attributes'}{'name'}
463 2 0 2 $name or not $force
681 16 74 41 not $enc or $enc =~ /$NO_ENCODE_RE/u
773 17 8 4 @{$parts;} > 1 or $ct_header->{'type'} eq "multipart"
875 0 0 8 @subparts != @orig_subparts || grep({$subparts[$_] != $orig_subparts[$_];} 0 .. $#subparts) || grep({$changed{0 + $subparts[$_]};} 0 .. $#subparts)
6 0 8 $differ ||= @subparts != @orig_subparts || grep({$subparts[$_] != $orig_subparts[$_];} 0 .. $#subparts) || grep({$changed{0 + $subparts[$_]};} 0 .. $#subparts)