| blib/lib/Mail/Box/Parser/Perl.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 8 | 30 | 26.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 71 | 0 | 0 | 0 | @ret and $self->fixHeaderErrors |
| 110 | 0 | 0 | 0 | defined $line and $line =~ /$empty/ |
| 130 | 0 | 20 | 0 | defined $line and $line =~ /$empty/ |
| 165 | 20 | 0 | 0 | $sep eq "From " and not $line =~ / 19[789][0-9]| 20[0-9][0-9]/ |
| 175 | 6 | 0 | 14 | @$lines and $lines->[-1] =~ s/(\r?\n)\z// |
| 176 | 3 | 0 | 11 | @seps == 1 and length $lines->[-1] == 0 |
| 215 | 0 | 0 | 0 | defined $exp_chars and $exp_chars >= 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 116 | 0 | 0 | 0 | $sep ne "From " or $line =~ / (?:19[6-9]|20[0-3])[0-9]\b/ |
| 272 | 12 | 0 | 0 | $args->{'file'} || 'IO::File'->new($args->{'filename'}, $mode) |
| 277 | 12 | 0 | 0 | $fh->can("binmode") or $fh->can("BINMODE") |