| line |
true |
false |
branch |
|
26
|
6 |
254 |
if index($mhead->{'from'}, "\"InterScan MSS\"") == 0 |
|
27
|
0 |
260 |
if index($mhead->{'from'}, "\"InterScan Notification\"") == 0 |
|
28
|
16 |
244 |
if grep {$mhead->{'subject'} eq $_;} @$tryto |
|
29
|
244 |
16 |
unless $match |
|
40
|
151 |
418 |
unless length $e |
|
43
|
16 |
396 |
if ($e =~ /\A.+[<>]{3}[ \t]+.+[<]([^ ]+[\@][^ ]+)[>]\z/ or $e =~ /\A.+[<>]{3}[ \t]+.+[<]([^ ]+[\@][^ ]+)[>]/ or $e =~ /\A(?:Reason:[ ]+)?Unable[ ]to[ ]deliver[ ]message[ ]to[ ][<](.+)[>]/) |
|
50
|
0 |
22 |
if ($v->{'recipient'} and $cr ne $v->{'recipient'}) |
|
56
|
10 |
12 |
if $e =~ /Unable[ ]to[ ]deliver[ ]/ |
|
60
|
6 |
412 |
if ($e =~ /\ASent[ \t]+[<]{3}[ \t]+([A-Z]{4})[ \t]/) { } |
|
|
6 |
406 |
elsif ($e =~ /\AReceived[ \t]+[>]{3}[ \t]+(\d{3}[ \t]+.+)\z/) { } |
|
70
|
406 |
0 |
unless $e =~ /[ ][<>]{3}[ ]/ |
|
71
|
0 |
0 |
if $e =~ /[ ][>]{3}[ ]([A-Z]{4})/ |
|
72
|
0 |
0 |
if $e =~ /[ ][<]{3}[ ](.+)/ |
|
75
|
0 |
16 |
unless $recipients |
|
80
|
10 |
6 |
if $e->{'diagnosis'} =~ /Unable[ ]to[ ]deliver/ |