Branch Coverage

lib/Sisimai/Lhost/Notes.pm
Criterion Covered Total %
branch 21 34 61.7


line true false branch
19 192 16 unless index($mhead->{'subject'}, "Undeliverable message") == 0
41 16 0 $mhead->{'content-type'} =~ /\A.+;[ ]*charset=(.+)\z/ ? :
46 16 48 unless ($readcursor)
48 16 0 if index($e, $startingof->{'message'}[0]) == 0
51 0 48 unless $readcursor & $indicators->{'deliverystatus'}
60 16 32 if ($e =~ /\A[^ ]+[\@][^ ]+/) { }
62 0 16 if ($v->{'recipient'})
71 16 16 if $e eq ""
72 0 16 if index($e, "-") == 0
74 11 5 if ($e =~ /[^\x20-\x7e]/) { }
77 11 0 if ($characters) { }
80 0 11 if $@
95 0 16 unless ($recipients)
97 0 0 if ($emailsteak->[1] =~ /^To:[ ]*(.+)$/m)
99 0 0 if $v->{'recipient'}
102 0 16 unless $recipients
110 12 10 unless grep {index($e->{'diagnosis'}, $_) > -1;} @{$$messagesof{$r};}