Branch Coverage

lib/Sisimai/Lhost/Bigfoot.pm
Criterion Covered Total %
branch 32 44 72.7


line true false branch
21 6 203 if rindex($mhead->{'from'}, "\@bigfoot.com>") > -1
22 6 203 if grep {rindex($_, ".bigfoot.com ") > -1;} @{$$mhead{"received"};}
23 203 6 unless $match
45 54 78 unless ($readcursor)
47 6 48 if $e =~ /$markingsof->{'message'}/
50 0 78 unless $readcursor & $indicators->{'deliverystatus'}
51 12 66 unless length $e
53 48 18 if (my $f = 'Sisimai::RFC1894'->match($e)) { }
55 0 48 unless my $o = "Sisimai::RFC1894"->field($e)
58 6 42 if ($o->[-1] eq 'addr') { }
6 36 elsif ($o->[-1] eq 'code') { }
61 6 0 if ($o->[0] eq 'final-recipient') { }
63 0 6 if ($v->{'recipient'})
82 0 36 unless exists $$fieldtable{$o->[0]}
85 24 12 unless $f == 1
90 18 0 if (substr($e, 0, 1) ne ' ') { }
94 6 12 if ($e =~ /\A[>]{3}[ ]+([A-Z]{4})[ ]?/) { }
6 6 elsif ($e =~ /\A[<]{3}[ ]+(.+)\z/) { }
104 0 0 unless index($p, "Diagnostic-Code:") == 0
105 0 0 unless $e =~ /\A[ \t]+(.+)\z/
113 0 6 unless $recipients
122 6 0 if $esmtpreply