| blib/lib/Mail/Box/Parser/Perl.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 49 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 82 | 0 | 0 | 0 | defined $size and defined $mtime |
| 107 | 0 | 0 | 0 | @ret and $self->fixHeaderErrors |
| 143 | 0 | 0 | 0 | defined $line and $line =~ /$empty_line/ |
| 160 | 0 | 0 | 0 | defined $line and $line =~ /$empty_line/ |
| 193 | 0 | 0 | 0 | $sep eq "From " and not $line =~ / 19[789][0-9]| 20[0-9][0-9]/ |
| 203 | 0 | 0 | 0 | @$lines and $lines->[-1] =~ s/\015?\012\z// |
| 206 | 0 | 0 | 0 | @$seps == 1 and @$lines > 1 |
| 0 | 0 | 0 | @$seps == 1 and @$lines > 1 and length $lines->[-1] == 0 | |
| 243 | 0 | 0 | 0 | defined $exp_chars and $exp_chars >= 0 |
| line | l | !l | condition |
|---|---|---|---|
| 36 | 0 | 0 | $args->{'mode'} || 'r' |
| 136 | 0 | 0 | $self->activeSeparator // (return 1) |
| 147 | 0 | 0 | $line // (return 1) |
| 155 | 0 | 0 | $self->activeSeparator // (return ()) |
| 165 | 0 | 0 | $line // (return ()) |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 38 | 0 | 0 | 0 | $args->{'filename'} || ref $args->{'file'} |
| 149 | 0 | 0 | 0 | $sep ne "From " or $line =~ / (?:19[6-9]|20[0-3])[0-9]\b/ |
| 303 | 0 | 0 | 0 | $args{'file'} || 'IO::File'->new($self->filename, $args{'mode'} || $self->openMode) |
| 306 | 0 | 0 | 0 | $fh->can("binmode") or $fh->can("BINMODE") |