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 |