Branch Coverage

lib/Sisimai/Lhost/AmazonWorkMail.pm
Criterion Covered Total %
branch 32 42 76.1


line true false branch
25 83 341 if $mhead->{'x-ses-outgoing'}
26 63 361 if ($xmail)
29 36 27 if $xmail eq "Amazon WorkMail"
31 388 36 if $match < 2
50 252 1275 unless ($readcursor)
52 36 216 if index($e, $startingof->{'message'}[0]) == 0
55 0 1275 unless $readcursor & $indicators->{'deliverystatus'}
56 216 1059 unless length $e
58 180 879 if (my $f = "Sisimai::RFC1894"->match($e))
60 0 180 unless my $o = "Sisimai::RFC1894"->field($e)
63 36 144 if ($o->[-1] eq 'addr') { }
36 108 elsif ($o->[-1] eq 'code') { }
66 36 0 if ($o->[0] eq 'final-recipient') { }
68 0 36 if ($v->{'recipient'})
87 0 108 unless exists $$fieldtable{$o->[0]}
90 72 36 unless $f == 1
99 0 987 if index($e, "") == 0
101 0 36 unless $recipients
109 0 36 if ($e->{'status'} =~ /\A[45][.][01][.]0\z/)
113 0 0 if $e->{'diagnosis'} =~ /["'](\d[.]\d[.]\d.+)['"]/
119 10 26 if $e->{'diagnosis'} =~ /[<]([245]\d\d)[ ].+[>]/