blib/lib/Email/Reply.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 15 | 28 | 53.5 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
116 | 3 | 0 | 0 | $part->content_type and not $part->content_type =~ m[\btext/plain\b] |
120 | 1 | 1 | 1 | not $$self{'keep_sig'} and $body =~ /$crlf--\s*$crlf/o |
line | l | !l | condition |
---|---|---|---|
53 | 1 | 2 | $args{'prefix'} || '> ' |
75 | 3 | 0 | $$self{'original'}->header('Subject') || '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
30 | 3 | 0 | 0 | $$reply{'quote'} or $$reply{'top_post'} |
41 | 1 | 2 | 0 | $args{'from'} || $$self{'original'}->header('To') |
44 | 3 | 0 | 0 | $$self{'original'}->header('Reply-To') || $$self{'original'}->header('From') || $$self{'original'}->header('Return-Path') |
50 | 1 | 2 | 0 | $args{'attrib'} || ($$self{'to'}->name || join($$self{'to'}->address, '<', '>')) . ' wrote:' |
120 | 1 | 0 | 0 | $self->_strip_sig($body) || $body |
124 | 3 | 0 | 0 | $end ||= $CRLF |