blib/lib/Mail/Message/Construct/Reply.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 26 | 53 | 49.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
42 | 3 | 0 | 0 | $body->isMultipart and $body->parts == 1 |
51 | 1 | 0 | 2 | $strip && !$body->isMultipart && !$body->isBinary |
54 | 0 | 3 | 0 | $include eq "INLINE" and $body->isMultipart |
0 | 3 | 0 | $include eq "INLINE" and $body->isBinary | |
97 | 0 | 2 | 1 | not defined $cc and $args{'group_reply'} |
111 | 3 | 0 | 0 | $msgid and not $msgid =~ /^\s*\<.*\>\s*$/ |
123 | 1 | 0 | 2 | defined $prelude and not &blessed($prelude) |
127 | 1 | 2 | 0 | defined $postlude and not &blessed($postlude) |
138 | 3 | 0 | 0 | defined $signature and $signature->isa("Mail::Message") |
190 | 1 | 1 | 22 | defined $subject and length $subject |
239 | 0 | 0 | 2 | ref $user && $user->isa('Mail::Address') |
line | l | !l | condition |
---|---|---|---|
29 | 0 | 3 | $args{'include'} || 'INLINE' |
159 | 0 | 3 | $args{'message_type'} || 'Mail::Message' |
161 | 3 | 0 | $from || 'Undisclosed senders:;' |
216 | 24 | 0 | join(':', @subject) || 'your mail' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
28 | 2 | 0 | 1 | !exists $args{'strip_signature'} || $args{'strip_signature'} |
31 | 3 | 0 | 0 | $include eq "INLINE" or $include eq "ATTACH" |
92 | 0 | 3 | 0 | delete $args{'To'} || $mainhead->get('reply-to') || $mainhead->get('from') |
239 | 2 | 0 | 0 | $user->name || $user->address || $user->format |