line |
true |
false |
branch |
21
|
61 |
191 |
if rindex($mhead->{'content-type'}, "Boundary_(ID_") > -1 |
22
|
61 |
191 |
if index($mhead->{'subject'}, "Delivery Notification: ") == 0 |
23
|
191 |
61 |
unless $match |
39
|
117 |
1798 |
unless ($readcursor) |
41
|
61 |
56 |
if index($e, $startingof->{'message'}[0]) == 0 |
44
|
0 |
1798 |
unless $readcursor & $indicators->{'deliverystatus'} |
45
|
416 |
1382 |
unless length $e |
67
|
66 |
1316 |
if ($e =~ /\A[ \t]+Recipient address:[ \t]*([^ ]+[\@][^ ]+)\z/) { } |
|
5 |
1311 |
elsif ($e =~ /\A[ \t]+Original address:[ \t]*([^ ]+[\@][^ ]+)\z/) { } |
|
61 |
1250 |
elsif ($e =~ /\A[ \t]+Date:[ \t]*(.+)\z/) { } |
|
66 |
1184 |
elsif ($e =~ /\A[ \t]+Reason:[ \t]*(.+)\z/) { } |
|
46 |
1138 |
elsif ($e =~ /\A[ \t]+Diagnostic code:[ \t]*([^ ]+);(.+)\z/) { } |
|
36 |
1102 |
elsif ($e =~ /\A[ \t]+Remote system:[ \t]*dns;([^ ]+)[ \t]*([^ ]+)[ \t]*.+\z/) { } |
69
|
5 |
61 |
if ($v->{'recipient'}) |
103
|
0 |
36 |
unless $sessionlog =~ /\A[(]TCP|(.+)|\d+|(.+)|\d+[)]/ |
105
|
0 |
36 |
unless $remotehost =~ /[^.]+[.][^.]+/ |
120
|
61 |
1041 |
if ($e =~ /\AStatus:[ \t]*(\d[.]\d[.]\d)[ \t]*[(](.+)[)]\z/) { } |
|
0 |
1041 |
elsif ($e =~ /\AArrival-Date:[ ]*(.+)\z/) { } |
|
61 |
980 |
elsif ($e =~ /\AReporting-MTA:[ ]*(?:DNS|dns);[ ]*(.+)\z/) { } |
133
|
5 |
56 |
unless $v->{'lhost'} =~ /[^.]+[.][^ ]+/ |
137
|
0 |
61 |
unless $recipients |
144
|
61 |
5 |
unless grep {index($e->{'diagnosis'}, $_) > -1;} @{$$messagesof{$r};} |