Branch Coverage

lib/Sisimai/Reason.pm
Criterion Covered Total %
branch 46 52 88.4


line true false branch
40 43 3598 if $argv1 eq "undefined" or $argv1 eq "onhold" or $argv1 eq ""
75 0 1999 if not exists $$GetRetried{$argvs->{'reason'}} and $argvs->{'reason'}
76 2 2395 if substr($argvs->{'deliverystatus'}, 0, 2) eq "2."
81 2329 66 if ($codeformat eq "SMTP" or $codeformat eq "")
89 21756 1764 unless $p->true($argvs)
95 631 1764 unless ($reasontext or $reasontext eq "undefined")
98 0 631 if $reasontext eq "undefined"
99 52 579 if $argvs->{'action'} eq "delayed"
100 594 37 if $reasontext
104 0 37 if "Sisimai::Reason::Vacation"->match(lc $issuedcode)
105 27 10 if $issuedcode
117 145 486 if $argvs->{'reason'}
125 241 245 $reasontext eq '' ? :
126 231 255 if exists $GetRetried->{$reasontext} or $codeformat ne "SMTP"
135 5885 269 unless $p->match($issuedcode)
139 353 88 if $reasontext
143 0 88 if ($code2digit eq '5.6' or $code2digit eq '4.6') { }
0 88 elsif ($code2digit eq '5.7' or $code2digit eq '4.7') { }
15 73 elsif (CORE::index($codeformat, 'X-UNIX') == 0) { }
158 5 68 if "Sisimai::Reason::SyntaxError"->true($argvs)
160 20 68 if $reasontext
163 10 58 if (CORE::index($actiontext, 'delayed') == 0 or CORE::index($actiontext, 'expired') == 0) { }
170 21 37 if ($thecommand eq "EHLO" or $thecommand eq "HELO")
197 2147 144 unless $p->match($issuedcode)
201 144 44 if $reasontext
203 0 44 if (CORE::index(uc $issuedcode, 'X-UNIX; ') != -1) { }