| line |
true |
false |
branch |
|
20
|
66 |
97 |
if "Sisimai::String"->aligned(\$ctype, ["report-type=", "feedback-report"]) |
|
22
|
32 |
65 |
if (index($ctype, "multipart/mixed") != -1) |
|
25
|
30 |
2 |
if (index($heads->{'subject'}, "complaint about message from ") != -1) |
|
29
|
30 |
0 |
if grep {index($heads->{'from'}, $_) != -1;} @$abuse |
|
34
|
62 |
5 |
unless exists $heads->{'x-apple-unsubscribe'} |
|
35
|
5 |
0 |
if $heads->{'x-apple-unsubscribe'} eq "true" |
|
46
|
62 |
101 |
unless is_arf(undef, $mhead) |
|
105
|
761 |
960 |
unless ($readcursor) |
|
111
|
4210 |
66 |
unless "Sisimai::String"->aligned(\$r, $f) |
|
118
|
150 |
810 |
if ($readcursor & $indicators->{'deliverystatus'}) == 0 or $e eq "" |
|
119
|
66 |
744 |
if ($e eq $reportfrom) |
|
121
|
573 |
171 |
if ($reportpart) { } |
|
132
|
70 |
503 |
if (index($e, 'Original-Rcpt-To: ') == 0 or index($e, 'Removal-Recipient: ') == 0) { } |
|
|
66 |
437 |
elsif (index($e, 'Feedback-Type: ') == 0) { } |
|
|
141 |
296 |
elsif (index($e, 'Authentication-Results: ') == 0 or index($e, 'User-Agent: ') == 0 or index($e, 'Original-Mail-From: ') == 0) { } |
|
|
51 |
245 |
elsif (index($e, 'Received-Date: ') == 0 or index($e, 'Arrival-Date: ') == 0) { } |
|
|
0 |
245 |
elsif (index($e, 'Reporting-MTA: ') == 0) { } |
|
|
46 |
199 |
elsif (index($e, 'Source-IP: ') == 0) { } |
|
136
|
0 |
70 |
unless "Sisimai::Address"->is_emailaddress($cv) |
|
137
|
0 |
70 |
if $cw > 0 and $cv eq $$dscontents[$cw - 1]{'recipient'} |
|
139
|
35 |
35 |
if ($v->{'recipient'}) |
|
174
|
0 |
0 |
if scalar @$cv == 0 |
|
190
|
5 |
61 |
if (exists $mhead->{'x-apple-unsubscribe'}) { } |
|
192
|
0 |
5 |
if $mhead->{'x-apple-unsubscribe'} ne "true" or index($mhead->{'from'}, "\@") < 1 |
|
198
|
5 |
0 |
if $emailparts->[1] eq "" |
|
202
|
30 |
31 |
if $p1 < 0 |
|
203
|
0 |
31 |
if $p2 < 0 |
|
208
|
10 |
21 |
unless "Sisimai::Address"->is_emailaddress($cv) |
|
213
|
30 |
71 |
if $recipients == 0 |
|
215
|
66 |
5 |
if $anotherone ne "" |
|
216
|
66 |
5 |
if substr($anotherone, -1, 1) eq "," |
|
228
|
71 |
35 |
if $j == 0 or scalar @$dscontents == 1 |