Branch Coverage

lib/Sisimai/Lhost/X5.pm
Criterion Covered Total %
branch 29 42 69.0


line true false branch
21 6 195 if defined $mhead->{'to'} and rindex($mhead->{'to'}, "NotificationRecipients") > -1
22 5 196 if (rindex($mhead->{'from'}, "TWFpbCBEZWxpdmVyeSBTdWJzeXN0ZW0") > -1)
27 0 5 unless "Sisimai::MIME"->is_mimeencoded(\$f)
28 5 0 if rindex("Sisimai::MIME"->mimedecode([$f]), "Mail Delivery Subsystem") > -1
33 0 201 if ("Sisimai::MIME"->is_mimeencoded(\$mhead->{'subject'}))
36 0 0 if rindex($plain, "Mail Delivery Subsystem") > -1
38 196 5 if $match < 2
61 60 65 unless ($readcursor)
63 5 55 if index($e, $startingof->{'message'}[0]) == 0
66 0 65 unless $readcursor & $indicators->{'deliverystatus'}
67 15 50 unless length $e
70 45 5 if ('Sisimai::RFC1894'->match($e)) { }
72 0 45 unless my $o = "Sisimai::RFC1894"->field($e)
75 10 35 if ($o->[-1] eq 'addr') { }
5 30 elsif ($o->[-1] eq 'code') { }
78 5 5 if ($o->[0] eq 'final-recipient') { }
80 0 5 if ($v->{'recipient'})
99 0 30 unless exists $$fieldtable{$o->[0]}
104 5 0 unless index($p, "Diagnostic-Code:") == 0
105 0 0 unless $e =~ /\A[ \t]+(.+)\z/
112 0 5 unless $recipients