| line |
true |
false |
branch |
|
38
|
0 |
3 |
if ($include eq 'NO') { } |
|
|
3 |
0 |
elsif ($include eq 'INLINE' or $include eq 'ATTACH') { } |
|
44
|
3 |
0 |
unless (defined $body) |
|
47
|
0 |
3 |
if $body->isMultipart and $body->parts == 1 |
|
48
|
0 |
3 |
if $body->isNested |
|
53
|
2 |
1 |
$strip && !$body->isMultipart && !$body->isBinary ? : |
|
56
|
0 |
3 |
if ($include eq 'INLINE' and $body->isMultipart) { } |
|
|
0 |
3 |
elsif ($include eq 'INLINE' and $body->isBinary) { } |
|
62
|
3 |
0 |
if ($include eq "INLINE") |
|
63
|
1 |
0 |
exists $args{'quote'} ? : |
|
|
2 |
1 |
defined $args{'quote'} ? : |
|
64
|
2 |
1 |
if (defined $quote) |
|
65
|
1 |
1 |
ref $quote ? : |
|
82
|
3 |
0 |
unless (defined $from) |
|
84
|
3 |
0 |
if @from |
|
89
|
0 |
3 |
unless defined $to |
|
93
|
1 |
2 |
if (not defined $cc and $args{'group_reply'}) |
|
95
|
1 |
0 |
if @cc |
|
100
|
0 |
0 |
ref $srcsub ? : |
|
|
3 |
0 |
!defined($srcsub) ? : |
|
107
|
0 |
3 |
if $msgid and not $msgid =~ /^\s*\<.*\>\s*$/ |
|
117
|
1 |
2 |
exists $args{'prelude'} ? : |
|
|
0 |
3 |
defined $args{'prelude'} ? : |
|
119
|
2 |
1 |
if defined $prelude and not builtin::blessed($prelude) |
|
123
|
0 |
3 |
if defined $postlude and not builtin::blessed($postlude) |
|
131
|
0 |
3 |
if ($include eq 'NO') { } |
|
|
3 |
0 |
elsif ($include eq 'INLINE') { } |
|
|
0 |
0 |
elsif ($include eq 'ATTACH') { } |
|
134
|
0 |
3 |
if defined $signature and $signature->isa("Mail::Message") |
|
137
|
0 |
3 |
defined $signature ? : |
|
145
|
0 |
3 |
$refs ? : |
|
155
|
1 |
2 |
if $cc |
|
156
|
1 |
2 |
if $args{'Bcc'} |
|
171
|
2 |
22 |
unless defined $subject and length $subject |
|
178
|
24 |
14 |
if $subject[0] =~ /[A-QS-Za-qs-z][A-DF-Za-df-z]/ |
|
189
|
24 |
0 |
if (@subject) |
|
200
|
8 |
16 |
$re_count == 1 ? : |
|
207
|
0 |
2 |
if ref $who eq "ARRAY" |
|
209
|
2 |
0 |
$who->isa('Mail::Message::Field') ? : |
|
|
0 |
2 |
!builtin::blessed($who) ? : |
|
|
0 |
2 |
!defined($who) ? : |
|
215
|
2 |
0 |
builtin::blessed($user) && $user->isa('Mail::Address') ? : |