| line |
true |
false |
branch |
|
51
|
4 |
3 |
unless (exists $$self{'from'}) |
|
58
|
7 |
0 |
unless (exists $$self{'date'}) |
|
63
|
8 |
6 |
if (-f $$self{$cfg}) |
|
65
|
0 |
8 |
if (defined $yml and ref $yml ne 'HASH') |
|
70
|
5 |
3 |
if defined $yml |
|
84
|
0 |
0 |
unless defined $$self{'subject'} |
|
87
|
0 |
0 |
if defined $$self{'program'} |
|
88
|
0 |
0 |
unless defined $mailer |
|
90
|
0 |
0 |
unless open PIPE, '|-', $mailer, '-s', $$self{'subject'}, $$self{'to'} |
|
103
|
1 |
1 |
unless ($$self{'raise_error'} or $evaled) |
|
115
|
2 |
1 |
if (do {
$$self{'transport'} eq 'sendmail'
}) { } |
|
|
1 |
0 |
elsif ($$self{'transport'} eq 'smtp') { } |
|
|
0 |
0 |
elsif ($$self{'transport'} eq 'mail') { } |
|
122
|
1 |
0 |
unless defined $$self{'smtp_server'} |
|
124
|
0 |
0 |
if exists $$self{'smtp_port'} |
|
136
|
8 |
4 |
if exists $$self{$_} |
|
140
|
0 |
2 |
if ($$self{'html_compat'}) |
|
146
|
0 |
2 |
if ($$self{'attach'}) |
|
152
|
2 |
0 |
if ($ENV{'MAIL_DWIM_TEST'}) { } |
|
156
|
8 |
0 |
if defined $headers{$_} |
|
180
|
1 |
0 |
if ($@) |
|
191
|
1 |
1 |
if (defined $text) |
|
203
|
0 |
2 |
unless open FILE, ">>$ENV{'MAIL_DWIM_TEST'}" |
|
215
|
1 |
0 |
if ($@) |
|
229
|
1 |
0 |
if ($@) |
|
242
|
0 |
0 |
unless (html_requirements()) |
|
282
|
0 |
0 |
unless (attach_requirements()) |
|
298
|
0 |
0 |
unless defined $type |
|
323
|
0 |
0 |
if (exists $wanted{$$field[0]}) |
|
349
|
4 |
2 |
if (length $data <= $maxlen) |
|
353
|
0 |
2 |
if $maxlen < 12 |
|
386
|
0 |
8 |
unless open FILE, ">$file" |
|
399
|
0 |
2 |
unless open FILE, "<$file" |
|
411
|
4 |
0 |
if (defined $domain and length $domain) |
|
417
|
0 |
0 |
unless ($@) |
|
435
|
0 |
0 |
if -x $full |