Branch Coverage

lib/Sisimai/Lhost/EZweb.pm
Criterion Covered Total %
branch 43 56 76.7


line true false branch
24 41 865 if rindex($mhead->{'from'}, "Postmaster\@ezweb.ne.jp") != -1
25 0 906 if rindex($mhead->{'from'}, "Postmaster\@au.com") != -1
26 41 865 if $mhead->{'subject'} eq "Mail System Error - Returned Mail"
27 16 890 if grep {rindex($_, "ezweb.ne.jp (EZweb Mail) with") != -1;} @{$$mhead{"received"}}
28 0 906 if grep {rindex($_, ".au.com (") != -1;} @{$$mhead{"received"}}
29 845 61 if (defined $mhead->{'message-id'})
30 41 804 if substr($mhead->{'message-id'}, -13, 13) eq ".ezweb.ne.jp>"
31 0 845 if substr($mhead->{'message-id'}, -8, 8) eq ".au.com>"
33 865 41 if $match < 2
67 301 232 unless ($readcursor)
69 41 260 if grep {index($e, $_) != -1;} @{$$startingof{"message"}}
71 336 197 if ($readcursor & $indicators->{'deliverystatus'}) == 0 or $e eq ""
86 41 156 if ('Sisimai::String'->aligned(\$e, ['<', '@', '>']) and index($e, 'Recipient: <') > 1 || index($e, '<') == 0) { }
50 106 elsif (my $f = 'Sisimai::RFC1894'->match($e)) { }
91 0 41 if ($v->{'recipient'})
102 0 50 unless my $o = "Sisimai::RFC1894"->field($e)
103 0 50 unless exists $$fieldtable{$o->[0]}
108 0 106 if "Sisimai::String"->is_8bit(\$e)
109 15 91 if (index($e, ' >>> ') != -1) { }
15 76 elsif (index($e, ' <<< ') != -1) { }
121 26 50 if (grep {index($e, $_) != -1;} @$substrings)
126 50 26 if $isincluded == 0
130 0 41 unless $recipients
137 6 35 if (defined $mhead->{'x-spasign'} and $mhead->{'x-spasign'} eq 'NG') { }
149 52 35 unless index($e->{'diagnosis'}, $f) != -1
155 41 0 if $e->{'reason'}
156 0 0 if index($e->{'recipient'}, "\@ezweb.ne.jp") > 1 or index($e->{'recipient'}, "\@au.com") > 1
157 0 0 if index($e->{'diagnosis'}, "<") == 0