| line |
true |
false |
branch |
|
142
|
130 |
3 |
unless $k =~ /^header\.(\w+)\.name$/ |
|
148
|
0 |
3 |
unless $n and $v |
|
150
|
1 |
2 |
if $n =~ /^(.*):$/ |
|
152
|
3 |
0 |
if ($n =~ /^[a-z][a-z0-9-]*[a-z]$/i) { } |
|
162
|
1 |
19 |
if (my $one_click_unsubscribe = $args->{'one_click_unsubscribe'}) |
|
167
|
1 |
0 |
if ($one_click_unsubscribe =~ m[^https://]) { } |
|
180
|
3 |
17 |
if (my $override_to = $config->{'override_to'}) |
|
183
|
0 |
3 |
if (my $override_except = $config->{'override_except'}) { } |
|
184
|
0 |
0 |
unless ref $override_except eq "ARRAY" |
|
190
|
0 |
0 |
if (grep {index(lc $email, $_) != -1;} @$override_except) { } |
|
198
|
0 |
0 |
%override ? : |
|
206
|
3 |
0 |
if $to |
|
207
|
1 |
2 |
if $cc |
|
208
|
1 |
2 |
if $bcc |
|
216
|
3 |
17 |
if (not $from) { } |
|
218
|
0 |
3 |
if ref $from |
|
222
|
0 |
0 |
if ref $config->{'from'} and $config->{'from'}{$from} |
|
224
|
0 |
20 |
unless $from |
|
226
|
0 |
20 |
if (my $override_from = $config->{'override_from'}) |
|
227
|
0 |
0 |
if ($override_from ne $from) |
|
237
|
0 |
20 |
if ($from =~ /^\s*.*\s+<(.*\@.*)>\s*$/) { } |
|
|
0 |
20 |
elsif ($from =~ /^\s*(.*\@.*)\s+\(.*\)\s*$/) { } |
|
249
|
1 |
19 |
if (my $subject_prefix = $config->{'subject_prefix'}) |
|
250
|
0 |
1 |
$subject_prefix =~ /\s$/ ? : |
|
253
|
0 |
20 |
if (my $subject_suffix = $config->{'subject_suffix'}) |
|
254
|
0 |
0 |
$subject_suffix =~ /\s$/ ? : |
|
265
|
3 |
17 |
if (&Encode::is_utf8($subject)) |
|
293
|
13 |
7 |
if ($args->{'text.path'} or $args->{'path'} or $args->{'text.template'} or $args->{'template'}) |
|
304
|
15 |
5 |
if ($args->{'html.path'} or $args->{'html.template'}) |
|
312
|
0 |
20 |
unless defined $text or defined $html |
|
319
|
124 |
9 |
unless $k =~ /^attachment\.(\w+)\.type$/ |
|
328
|
9 |
0 |
if ($$args{'attachment.' . $id . '.template'} or $$args{'attachment.' . $id . '.path'}) { } |
|
|
0 |
0 |
elsif ($$args{'attachment.' . $id . '.file'}) { } |
|
331
|
77 |
35 |
unless $kk =~ /^attachment\.$id\.(.*)$/ |
|
336
|
9 |
0 |
if ($$args{'attachment.' . $id . '.unparsed'}) { } |
|
337
|
7 |
2 |
if (defined $$args{'attachment.' . $id . '.template'}) { } |
|
|
2 |
0 |
elsif (defined $$args{'attachment.' . $id . '.path'}) { } |
|
351
|
0 |
0 |
if ($$args{'attachment.' . $id . '.pass'}) |
|
362
|
1 |
8 |
if utf8::is_utf8($content) |
|
387
|
3 |
17 |
$charset && utf8::is_utf8($subject) ? : |
|
400
|
6 |
14 |
if (defined $html and not defined $text and not @attachments) { } |
|
|
4 |
10 |
elsif (defined $text and not defined $html and not @attachments) { } |
|
401
|
0 |
6 |
$charset && utf8::is_utf8($html) ? : |
|
408
|
6 |
0 |
if $charset |
|
414
|
0 |
4 |
$charset && utf8::is_utf8($text) ? : |
|
421
|
3 |
1 |
if $charset |
|
428
|
9 |
1 |
if (defined $text) |
|
429
|
0 |
9 |
$charset && utf8::is_utf8($text) ? : |
|
438
|
9 |
0 |
if $charset |
|
442
|
9 |
1 |
if (defined $html) |
|
443
|
0 |
9 |
$charset && utf8::is_utf8($html) ? : |
|
452
|
9 |
0 |
if $charset |
|
455
|
5 |
5 |
@attachments ? : |
|
461
|
3 |
7 |
if ($text_part and $html_part and @attachments) { } |
|
476
|
6 |
1 |
if $text_part |
|
477
|
6 |
1 |
if $html_part |
|
487
|
0 |
20 |
if $args->{'date'} |
|
488
|
0 |
20 |
if $cc |
|
489
|
0 |
20 |
if $bcc |
|
490
|
1 |
19 |
if $args->{'replyto'} |
|
497
|
20 |
0 |
if (lc $method eq 'local') { } |
|
498
|
20 |
0 |
if ($agent) { } |