Branch Coverage

lib/Sisimai/Lhost/SurfControl.pm
Criterion Covered Total %
branch 26 36 72.2


line true false branch
22 212 16 unless $mhead->{'x-sef-processed'}
23 0 16 unless $mhead->{'x-mailer'}
24 0 16 unless $mhead->{'x-mailer'} eq "SurfControl E-mail Filter"
42 32 240 unless ($readcursor)
44 16 16 if index($e, $startingof->{'message'}[0]) == 0
47 0 240 unless $readcursor & $indicators->{'deliverystatus'}
48 48 192 unless length $e
61 16 176 if ($e =~ /\AAddressed To:[ \t]*([^ ]+?[\@][^ ]+?)\z/) { }
16 160 elsif ($e =~ /\A(?:Sun|Mon|Tue|Wed|Thu|Fri|Sat)[ \t,]/) { }
11 149 elsif ($e =~ /\A[^ ]+[\@][^ ]+:[ \t]*\[(\d+[.]\d+[.]\d+[.]\d)\],[ \t]*(.+)\z/) { }
63 0 16 if ($v->{'recipient'})
82 64 85 if (my $f = 'Sisimai::RFC1894'->match($e)) { }
84 0 64 unless my $o = "Sisimai::RFC1894"->field($e)
85 16 48 if $o->[0] eq "final-recipient"
86 0 48 unless exists $$fieldtable{$o->[0]}
91 85 0 unless index($p, "Diagnostic-Code:") == 0
92 0 0 unless $e =~ /\A[ \t]+(.+)\z/
100 0 16 unless $recipients