| blib/lib/Email/Reply.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 16 | 28 | 57.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 47 | 3 | 0 | 3 | defined $v and $v ne '' |
| 127 | 3 | 0 | 0 | $part->content_type and not $part->content_type =~ m[\btext/plain\b] |
| 132 | 1 | 1 | 1 | not $self->{'keep_sig'} and $body =~ /$crlf--\s*$crlf/o |
| line | l | !l | condition |
|---|---|---|---|
| 64 | 1 | 2 | $args{'prefix'} || '> ' |
| 86 | 3 | 0 | $self->{'original'}->header('Subject') || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 28 | 3 | 0 | 0 | $reply->{'quote'} or $reply->{'top_post'} |
| 39 | 1 | 2 | 0 | $args{'from'} || $self->{'original'}->header('To') |
| 62 | 1 | 2 | 0 | $args{'attrib'} || ($self->{'to'}->name || join($self->{'to'}->address, '<', '>')) . ' wrote:' |
| 132 | 1 | 0 | 0 | $self->_strip_sig($body) || $body |
| 135 | 3 | 0 | 0 | $end ||= $CRLF |