Branch Coverage

lib/Sisimai/Lhost/Sendmail.pm
Criterion Covered Total %
branch 67 74 90.5


line true false branch
20 37 1468 if $mhead->{'x-aol-ip'}
21 522 946 if index($mhead->{'subject'}, "see transcript for details") != -1
22 20 1448 if index($mhead->{'subject'}, "Warning: ") == 0
23 926 542 unless $match > 0
58 6339 8992 unless ($readcursor)
60 525 5814 if index($e, $startingof->{'message'}[0]) == 0
63 1087 7905 if ($readcursor & $indicators->{'deliverystatus'}) == 0 or $e eq ""
65 4617 3288 if (my $f = 'Sisimai::RFC1894'->match($e)) { }
67 0 4617 unless my $o = "Sisimai::RFC1894"->field($e)
70 598 4019 if ($o->[3] eq 'addr') { }
505 3514 elsif ($o->[3] eq 'code') { }
73 535 63 if ($o->[0] eq 'final-recipient') { }
75 10 525 if ($v->{'recipient'})
94 0 3514 unless exists $$fieldtable{$o->[0]}
95 122 3392 if $o->[3] eq "host" and "Sisimai::RFC1123"->is_internethost($o->[2]) == 0
98 2005 1387 unless $f == 1
109 3263 25 if (substr($e, 0, 1) ne ' ') { }
111 513 2750 if (index($e, '>>> ') == 0) { }
935 1815 elsif (index($e, '<<< ') == 0) { }
118 910 25 unless grep {$cv eq $_;} @$esmtpreply
122 1143 672 if $sessionerr
123 453 219 if (index($e, $startingof->{'error'}[0]) == 0)
130 10 209 if (index($e, '<') == 0 and 'Sisimai::String'->aligned(\$e, ['@', '>.', ' '])) { }
141 47 162 if (length $cr . $cs > 7) { }
45 117 elsif (index($e, 'Message ') == 0 or index($e, 'Warning: ') == 0) { }
158 20 5 if index($p, "Diagnostic-Code:") != 0 or index($e, " ") != 0
166 17 525 unless $recipients
172 67 0 if (exists $anotherset->{'diagnosis'} and $anotherset->{'diagnosis'})
174 0 67 if index($e->{'diagnosis'}, " ") == 0
175 15 52 if $e->{'diagnosis'} =~ /\A\d+\z/u
182 92 443 if scalar @$esmtpreply == 0 or $recipients != 1
188 463 72 if scalar @$esmtpreply
192 488 47 unless exists $anotherset->{'status'}
193 0 47 unless length $anotherset->{'status'}
194 47 0 if "Sisimai::SMTP::Status"->test($e->{'status'})
201 530 5 unless index($e->{'recipient'}, "\@") == 0
203 5 0 if scalar @$cv