| line |
true |
false |
branch |
|
42
|
0 |
75 |
unless ($$self{'body'}) |
|
53
|
6 |
15 |
if ($value =~ /for ?;/is and index($1, '@localhost') < 0) |
|
69
|
0 |
0 |
$self->header('content_type') && $self->header('content_type') =~ /charset=\"?([-\w]+)/iso ? : |
|
75
|
0 |
0 |
if $self->header('content_type') and $self->header('content_type') =~ m[multipart/(?:mixed|report);.*?boundary=\"(.+?)\"]iso |
|
87
|
1 |
474 |
if ($value_ref and $$value_ref and $$value_ref =~ /\=\?(.+?)\?(.)\?/i) |
|
99
|
0 |
552 |
unless $field |
|
100
|
347 |
205 |
if exists $$self{'header'}{$field} |
|
134
|
0 |
29 |
if $$self{'parsed_headers'} |
|
155
|
0 |
270 |
unless $2 |
|
166
|
21 |
249 |
if (my $sub = $self->can("_$name")) |
|
171
|
0 |
249 |
exists $header{$name} ? : |
|
196
|
29 |
0 |
unless ($$self{'recipients'}) |
|
198
|
26 |
3 |
unless $$self{'received_recipients'} |
|
199
|
3 |
26 |
/<(.+?)>/ ? : |
|
|
29 |
0 |
if $self->header('to') |
|
200
|
0 |
0 |
/<(.+?)>/ ? : |
|
|
0 |
29 |
if $self->header('cc') |
|
201
|
0 |
29 |
if $self->header('x_rcpt_to') and $self->header('x_rcpt_to') =~ /^?$/i |
|
204
|
35 |
0 |
index($_, '@') > 0 ? : |
|
215
|
0 |
0 |
unless open my $fh, '<', $filename |