Branch Coverage

lib/Sisimai/Lhost/AmazonSES.pm
Criterion Covered Total %
branch 27 40 67.5


line true false branch
68 890 47 unless index($$mbody, "{") != -1
69 22 25 unless exists $mhead->{'x-amz-sns-message-id'}
70 0 25 unless $mhead->{'x-amz-sns-message-id'}
80 20 5 if $p1 > 0
84 5 20 if ($p2 > 0)
98 0 25 if index($sespayload, "notificationType") == -1 or index($sespayload, "{") != 0
99 0 25 if substr($sespayload, -1, 1) ne "}"
102 0 25 unless $proceedsto
107 0 25 if ($@)
112 0 25 unless exists $jsonobject->{'notificationType'}
125 10 15 if ($whatnotify eq 'B') { }
5 10 elsif ($whatnotify eq 'C') { }
10 0 elsif ($whatnotify eq 'D') { }
128 10 0 $p->{'bounceType'} eq 'Permanent' ? :
132 0 10 if ($v->{'recipient'})
149 70 0 unless $ReasonPair->{$f} eq $p->{'bounceSubType'}
157 0 5 if ($v->{'recipient'})
173 0 10 if ($v->{'recipient'})
193 0 25 unless $recipients
204 25 25 if exists $or->{'commonHeaders'}{$_}