Condition Coverage

blib/lib/Mail/Message/Body.pm
Criterion Covered Total %
condition 47 77 61.0


and 3 conditions

line !l l&&!r l&&r condition
118 171 66 0 ref $mime and $mime->isa("MIME::Type")
141 26 52 159 $default_charset and $mime =~ m[^text/]i
78 85 74 $default_charset and $mime =~ m[^text/]i and not $mime->attribute("charset")
187 1 0 0 $eol eq $self->{'MMB_eol'} and $self->checked
239 514 0 526 not @_ and defined $self->{'MMB_type'}
269 213 49 290 not @_ and defined $self->{'MMB_transfer'}
279 170 53 164 not @_ and $self->{'MMB_description'}
289 170 53 166 not @_ and $self->{'MMB_disposition'}
300 170 53 164 not @_ and $self->{'MMB_id'}

or 2 conditions

line l !l condition
68 0 237 $args->{'modified'} || 0
134 3 104 $args->{'checked'} || 0
137 188 49 $mime ||= "text/plain"
152 1 236 $args->{'eol'} || 'NATIVE'
242 508 6 shift() // "text/plain"
391 31 129 $head->get("Content-$_") || ''
446 10 3 $in_module{$call} || 'construct'

or 3 conditions

line l !l&&r !l&&!r condition
73 40 13 32 $self->isMultipart || $self->isNested
77 0 0 0 $filename ||= $file
78 0 0 0 $mime_types->mimeTypeOf($filename) || (-T $file ? 'text/plain' : 'application/octet-stream')
0 0 0 $mime ||= $mime_types->mimeTypeOf($filename) || (-T $file ? 'text/plain' : 'application/octet-stream')
111 0 0 0 $disp //= "Mail::Message::Field"->new("Content-Disposition", -T $filename ? "inline" : "attachment", "filename", basename($filename))
115 0 0 0 $mime //= $mime_types->mimeTypeOf($filename)
123 83 47 0 $mime //= $based->type
124 13 117 0 $transfer //= $based->transferEncoding
125 0 130 0 $disp //= $based->disposition
126 0 130 0 $descr //= $based->description
127 0 130 0 $cid //= $based->contentId
260 26 0 0 $mime_types->type($body) || 'MIME::Type'->new('type', $body)