Branch Coverage

lib/Sisimai/Lhost/EZweb.pm
Criterion Covered Total %
branch 41 50 82.0


line true false branch
24 41 863 if rindex($mhead->{'from'}, "Postmaster\@ezweb.ne.jp") != -1
25 0 904 if rindex($mhead->{'from'}, "Postmaster\@au.com") != -1
26 41 863 if $mhead->{'subject'} eq "Mail System Error - Returned Mail"
27 16 888 if grep {rindex($_, "ezweb.ne.jp (EZweb Mail) with") != -1;} @{$$mhead{"received"}}
28 0 904 if grep {rindex($_, ".au.com (") != -1;} @{$$mhead{"received"}}
29 842 62 if (defined $mhead->{'message-id'})
30 41 801 if substr($mhead->{'message-id'}, -13, 13) eq ".ezweb.ne.jp>"
31 0 842 if substr($mhead->{'message-id'}, -8, 8) eq ".au.com>"
33 863 41 if $match < 2
55 301 232 unless ($readcursor)
57 41 260 if grep {index($e, $_) != -1;} @{$$startingof{"message"}}
59 336 197 if ($readcursor & $indicators->{'deliverystatus'}) == 0 or $e eq ""
74 41 156 if ('Sisimai::String'->aligned(\$e, ['<', '@', '>']) and index($e, 'Recipient: <') > 1 || index($e, '<') == 0) { }
50 106 elsif (my $f = 'Sisimai::RFC1894'->match($e)) { }
79 0 41 if ($v->{'recipient'})
90 0 50 unless my $o = "Sisimai::RFC1894"->field($e)
91 0 50 unless exists $$fieldtable{$o->[0]}
98 0 106 if "Sisimai::String"->is_8bit(\$e)
99 15 91 if index($e, " >>> ") != -1
103 0 41 unless $recipients
110 6 35 if (defined $mhead->{'x-spasign'} and $mhead->{'x-spasign'} eq 'NG') { }
117 15 20 if grep {index($e->{'diagnosis'}, $_) != -1;} @$unpaiduser
119 21 20 if $e->{'reason'}
120 15 5 if index($e->{'recipient'}, "\@ezweb.ne.jp") > 1 or index($e->{'recipient'}, "\@au.com") > 1
121 0 5 if index($e->{'diagnosis'}, "<") == 0