Condition Coverage

blib/lib/Mail/SpamAssassin/Message.pm
Criterion Covered Total %
condition 74 115 64.3


and 3 conditions

line !l l&&!r l&&r condition
209 0 30 120 Mail::SpamAssassin::Util::am_running_in_taint_mode() and grep {not &Scalar::Util::tainted($_);} @message
259 0 150 0 @message and $message[0] =~ /\015\012/ || $message[-1] =~ /\015\012/
398 134 0 16 $self->{'type'} =~ m[^multipart/]i and $#message > 0
134 1 15 $self->{'type'} =~ m[^multipart/]i and $#message > 0 and $message[0] =~ /\S/
400 0 4 11 defined $boundary and $message[0] =~ /^--\Q$boundary\E/
777 167 0 21 $msg->{'type'} =~ m[^multipart/]i and defined $boundary
167 0 21 $msg->{'type'} =~ m[^multipart/]i and defined $boundary and $subparse > 0
785 163 0 4 $msg->{'type'} =~ m[^message/(?!partial\z)]i and $subparse > 0
801 0 0 4 $msg->{'type'} =~ m[^message/(?:rfc822|global)\z]i and defined $msg->{'decoded'}
0 0 4 $msg->{'type'} =~ m[^message/(?:rfc822|global)\z]i and defined $msg->{'decoded'} and $msg->{'decoded'} ne ""
880 100 1 20 substr($body->[$line], 0, 2) eq "--" and $body->[$line] =~ /^--\Q$boundary\E\s*$/
888 0 15 5 $line + 1 < $tmp_line and not $$body[$line + 1] =~ /^[\041-\071\073-\176]+:/
917 2285 33 46 defined $boundary && substr($_, 0, 2) eq '--' && /^--\Q$boundary\E(?:--)?\s*$/
970 0 25 0 $line_count and not $$body[-$line_count] =~ /^[\041-\071\073-\176]+:/
1002 46 0 1 /^[ \t]/ and $header
1177 3 132 8 $scansize and length $rnd > $scansize
1181 5 1 2 $idx >= 0 and $idx - $scansize <= 1024
1187 5 0 1 $idx >= 0 and $idx - $scansize <= 1024
1203 4 131 8 $html_needs_setting and $type eq "text/html"
1262 3 97 8 $scansize and $rawlen > $scansize
1266 5 1 2 $idx >= 0 and $idx - $scansize <= 1024
1272 5 0 1 $idx >= 0 and $idx - $scansize <= 1024
1278 5 0 0 $idx >= 0 and $idx - $scansize <= 1024

or 2 conditions

line l !l condition
105 101 49 $opts->{'parsenow'} || 0
106 0 150 $opts->{'normalize'} || 0
123 143 7 $opts->{'body_part_scan_size'} || 0
124 143 7 $opts->{'rawbody_part_scan_size'} || 0
1082 4 163 $msg->header('content-disposition') || ''
1134 0 0 $_->{'type'} or ""
1163 93 40 $self->get_header('subject') || "\n"
1304 1 0 $length ||= 2048

or 3 conditions

line l !l&&r !l&&!r condition
101 0 150 0 ref $class || $class
159 18 0 69 ref $message eq "GLOB" or ref($message) =~ /^IO::/
259 0 0 150 $message[0] =~ /\015\012/ || $message[-1] =~ /\015\012/
480 32 0 44 not defined $hdr or $hdr eq ""
919 13 33 2318 --$line_count == 0 or $found_end_boundary
956 5 41 0 $p_boundary ||= $boundary
1078 167 0 0 !($ct[0] =~ m[^multipart/]i) || defined $boundary
1325 0 0 1 $j < 0 or $j - $ofs + 1 > 4096
1327 0 0 0 $j < 0 or $j - $ofs + 1 > 4096
1329 0 0 0 $j < 0 or $j - $ofs + 1 > 4096