| blib/lib/Mail/Message/Construct/Reply.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 27 | 58 | 46.5 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 47 | 3 | 0 | 0 | $body->isMultipart and $body->parts == 1 |
| 53 | 1 | 0 | 2 | $strip && !$body->isMultipart && !$body->isBinary |
| 56 | 0 | 3 | 0 | $include eq "INLINE" and $body->isMultipart |
| 0 | 3 | 0 | $include eq "INLINE" and $body->isBinary | |
| 93 | 0 | 2 | 1 | not defined $cc and $args{'group_reply'} |
| 107 | 3 | 0 | 0 | $msgid and not $msgid =~ /^\s*\<.*\>\s*$/ |
| 119 | 1 | 0 | 2 | defined $prelude and not builtin::blessed($prelude) |
| 123 | 1 | 2 | 0 | defined $postlude and not builtin::blessed($postlude) |
| 134 | 3 | 0 | 0 | defined $signature and $signature->isa("Mail::Message") |
| 171 | 1 | 1 | 22 | defined $subject and length $subject |
| 215 | 0 | 0 | 2 | builtin::blessed($user) && $user->isa('Mail::Address') |
| line | l | !l | condition |
|---|---|---|---|
| 36 | 0 | 3 | $args{'include'} || 'INLINE' |
| 144 | 0 | 3 | $args{'message_type'} || 'Mail::Message' |
| 145 | 3 | 0 | $from || 'Undisclosed senders:;' |
| 182 | 0 | 17 | $1 // 1 |
| 197 | 24 | 0 | join(':', @subject) || 'your mail' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 35 | 2 | 0 | 1 | !exists $args{'strip_signature'} || $args{'strip_signature'} |
| 38 | 3 | 0 | 0 | $include eq "INLINE" or $include eq "ATTACH" |
| 40 | 0 | 0 | 0 | $body //= "Mail::Message::Body"->new("data", ["\n[The original message is not included]\n\n"]) |
| 88 | 0 | 3 | 0 | delete $args{'To'} || $mainhead->get('reply-to') || $mainhead->get('from') |
| 215 | 2 | 0 | 0 | $user->name || $user->address || $user->format |