Condition Coverage

blib/lib/Email/MIME.pm
Criterion Covered Total %
condition 54 80 67.5


and 3 conditions

line !l l&&!r l&&r condition
266 40 0 14 $args{'parts'} and @{$args{'parts'};}
339 0 29 26 not $self->force_decode_hook and $cte =~ /$NO_ENCODE_RE/xi
364 1 1 0 $self->{'ct'}{'type'} eq "text" and $self->{'ct'}{'subtype'} eq 'plain' || $self->{'ct'}{'subtype'} eq 'html'
388 0 41 0 $MAX_DEPTH and $DEPTH > $MAX_DEPTH
396 0 0 41 defined $boundary and length $boundary
0 0 41 defined $boundary and length $boundary and $self->body_raw =~ /^--\Q$boundary\E\s*$/ms
467 0 0 2 $type && ($type->extensions)[0]
554 0 0 1 defined $value and length $value
772 16 0 9 defined $ct_header->{'attributes'}{'boundary'} and length $ct_header->{'attributes'}{'boundary'}

or 2 conditions

line l !l condition
129 138 26 $arg ||= {}
291 145 0 $self->{'mycrlf'} || "\n"
331 55 51 $self->header('Content-Transfer-Encoding') || ''
386 11 30 our $DEPTH ||= 0
405 41 0 $body || ''
413 37 4 $bits[0] || ''
438 5 2 $level ||= 0
440 6 1 $self->content_type || ''
452 1 3 $self->header_raw('Content-Disposition') || ''
468 2 0 $ext ||= "dat"
639 51 8 $enc ||= "7bit"
675 294 1 (caller 1)[3] || ''
720 8 0 $dis ||= "inline"

or 3 conditions

line l !l&&r !l&&!r condition
316 41 0 152 $self->{'ct'}{'type'} eq "multipart" or $self->{'ct'}{'type'} eq "message"
356 236 0 1 $_[0]{'body_raw'} || $_[0]->SUPER::body
364 1 0 0 $self->{'ct'}{'subtype'} eq 'plain' || $self->{'ct'}{'subtype'} eq 'html'
455 1 1 2 $attrs->{'filename'} || $self->{'ct'}{'attributes'}{'name'}
456 2 0 2 $name or not $force
676 16 74 41 not $enc or $enc =~ /$NO_ENCODE_RE/xi
768 17 8 4 @{$parts;} > 1 or $ct_header->{'type'} eq "multipart"
870 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)