blib/lib/Mail/Message/Construct/Forward.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 18 | 39 | 46.1 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
35 | 0 | 0 | 0 | defined $preamble and not ref $preamble |
82 | 0 | 0 | 7 | $msgid and not $msgid =~ /^\s*\<.*\>\s*$/ |
117 | 4 | 0 | 0 | $body->isMultipart and $body->parts == 1 |
127 | 1 | 0 | 3 | defined $prelude and not &blessed($prelude) |
148 | 1 | 0 | 2 | (!exists $args{'strip_signature'} || $args{'strip_signature'}) && !$body->isNested |
165 | 3 | 0 | 0 | defined $signature and $signature->isa('Mail::Message') |
227 | 1 | 5 | 8 | defined $subject && length $subject |
line | l | !l | condition |
---|---|---|---|
31 | 0 | 3 | $args{'include'} || 'INLINE' |
88 | 7 | 0 | $from || '(undisclosed)' |
140 | 0 | 1 | $args{'is_attached'} || "[The forwarded message is attached]\n" |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
81 | 0 | 7 | 0 | $args{'Message-ID'} || $mainhead->createMessageId |
137 | 0 | 1 | 3 | $body->isMultipart or $body->isBinary |
140 | 0 | 1 | 0 | $args{'preamble'} ||= $prelude->concatenate($prelude, $args{'is_attached'} || "[The forwarded message is attached]\n", $postlude) |
183 | 3 | 0 | 0 | !exists $args{'strip_signature'} || $args{'strip_signature'} |