Branch Coverage

lib/Sisimai/Message.pm
Criterion Covered Total %
branch 76 100 76.0


line true false branch
43 5583 1 unless exists $argvs->{$e}
44 0 1 unless ref $argvs->{$e} eq "ARRAY"
45 0 1 unless scalar @{$argvs->{$e};}
51 0 2792 unless my $aftersplit = "Sisimai::Message"->divideup(\$email)
58 2792 0 if ($thing->{'header'}{'subject'})
61 149 2643 'Sisimai::MIME'->is_mimeencoded(\$s) ? :
64 29 2763 if (lc($q) =~ /\A[ \t]*fwd?:[ ]*(.*)\z/)
76 9 2783 unless my $bouncedata = "Sisimai::Message"->parse(%$param)
77 0 2783 unless keys %$bouncedata
82 25 2758 ref $r ? :
102 5585 1 unless exists $argvs->{$e}
103 0 1 unless ref $argvs->{$e} eq "ARRAY"
104 0 1 unless scalar @{$argvs->{$e};}
106 1 0 if $e eq "order"
107 1 0 unless $e eq "load"
116 0 0 if $@
123 0 6 if grep {$e eq $_;} @$tobeloaded
138 240 2552 if rindex($$email, "\r\n") > -1
139 0 2792 if $$email =~ /[ \t]+$/
142 0 2792 unless $block->[1]
143 0 2792 unless $block->[2]
145 387 2405 if (substr($block->[1], 0, 5) eq 'From ') { }
154 2792 0 unless $block->[1] =~ /\n\z/
181 4858 692 if ($$argv0 =~ /^Received:/m)
188 2792 2758 unless $argv1
189 221 2537 unless length $headermaps->{'subject'}
192 34 2503 if ('Sisimai::String'->is_8bit(\$headermaps->{'subject'})) { }
200 0 34 if $@
205 241 2262 if ('Sisimai::MIME'->is_mimeencoded(\$headermaps->{'subject'})) { }
209 301 5 if "Sisimai::MIME"->is_mimeencoded(\$v)
249 438 2354 if (index($mesgformat, 'text/plain') == 0 or index($mesgformat, 'text/html') == 0) { }
251 5 433 if ($ctencoding eq 'base64') { }
45 388 elsif ($ctencoding eq 'quoted-printable') { }
261 0 438 if $mesgformat =~ m[text/html;?]
264 1928 426 if (index($mesgformat, "multipart/") == 0)
267 1884 44 if length $$p
272 548 2244 if (ref $hookmethod eq "CODE")
276 0 548 if $@
291 0 1 if exists $haveloaded->{$r}
295 1 0 if $parseddata
300 587 16838 if exists $haveloaded->{$r}
305 2610 14228 if $parseddata
308 181 0 unless ($haveloaded->{'Sisimai::RFC3464'})
314 131 50 if $parseddata
317 50 0 unless ($haveloaded->{'Sisimai::ARF'})
320 35 15 if "Sisimai::ARF"->is_arf($mailheader)
321 35 15 if $parseddata
324 15 0 unless ($haveloaded->{'Sisimai::RFC3834'})
329 6 9 if $parseddata
334 9 2783 unless $parseddata