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 | 6 | 0 | defined $line and $line =~ /$empty/ |
165 | 6 | 0 | 0 | $sep eq "From " and not $line =~ / 19[789][0-9]| 20[0-9][0-9]/ |
175 | 1 | 0 | 5 | @$lines and $lines->[-1] =~ s/(\r?\n)\z// |
176 | 3 | 0 | 2 | @seps == 1 and length $lines->[-1] == 0 |
217 | 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/ |
274 | 7 | 0 | 0 | $args->{'file'} || 'IO::File'->new($args->{'filename'}, $mode) |
279 | 7 | 0 | 0 | $fh->can("binmode") or $fh->can("BINMODE") |