| 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'} |
|
129
|
0 |
0 |
if (defined $$self{'user'}) |
|
142
|
8 |
4 |
if exists $$self{$_} |
|
146
|
0 |
2 |
if ($$self{'html_compat'}) |
|
152
|
0 |
2 |
if ($$self{'attach'}) |
|
158
|
2 |
0 |
if ($ENV{'MAIL_DWIM_TEST'}) { } |
|
162
|
8 |
0 |
if defined $headers{$_} |
|
186
|
1 |
0 |
if ($@) |
|
197
|
1 |
1 |
if (defined $text) |
|
209
|
0 |
2 |
unless open FILE, ">>$ENV{'MAIL_DWIM_TEST'}" |
|
221
|
1 |
0 |
if ($@) |
|
235
|
1 |
0 |
if ($@) |
|
248
|
0 |
0 |
unless (html_requirements()) |
|
281
|
0 |
0 |
unless ($headers{'Content-Type'} =~ /boundary/) |
|
297
|
0 |
0 |
unless (attach_requirements()) |
|
313
|
0 |
0 |
unless defined $type |
|
338
|
0 |
0 |
if (exists $wanted{$$field[0]}) |
|
364
|
4 |
2 |
if (length $data <= $maxlen) |
|
368
|
0 |
2 |
if $maxlen < 12 |
|
401
|
0 |
8 |
unless open FILE, ">$file" |
|
414
|
0 |
2 |
unless open FILE, "<$file" |
|
426
|
4 |
0 |
if (defined $domain and length $domain) |
|
432
|
0 |
0 |
unless ($@) |
|
450
|
0 |
0 |
if -x $full |