| line |
true |
false |
branch |
|
38
|
0 |
0 |
unless $self->{'MBPP_filename'} = $args->{'filename'} || ref $args->{'file'} |
|
54
|
0 |
0 |
unless $self->openFile(%args) |
|
72
|
0 |
0 |
unless $self->openFile(@_) |
|
82
|
0 |
0 |
unless defined $size and defined $mtime |
|
83
|
0 |
0 |
unless $size != $self->{'MBPP_size'} |
|
89
|
0 |
0 |
@_ ? : |
|
95
|
0 |
0 |
unless my $file = $self->file |
|
101
|
0 |
0 |
if $line =~ /$empty_line/ |
|
104
|
0 |
0 |
unless (defined $body) |
|
107
|
0 |
0 |
if (@ret and $self->fixHeaderErrors) |
|
117
|
0 |
0 |
unless length $body |
|
121
|
0 |
0 |
$line =~ /^[ \t]/ ? : |
|
139
|
0 |
0 |
unless $file->seek($where, 0) |
|
149
|
0 |
0 |
if substr($line, 0, length $sep) eq $sep |
|
168
|
0 |
0 |
if substr($line, 0, length $sep) eq $sep |
|
182
|
0 |
0 |
if (@$seps) { } |
|
187
|
0 |
0 |
unless my $line = $file->getline |
|
190
|
0 |
0 |
unless substr($line, 0, length $sep) eq $sep |
|
193
|
0 |
0 |
if $sep eq "From " and not $line =~ / 19[789][0-9]| 20[0-9][0-9]/ |
|
203
|
0 |
0 |
if (@$lines and $lines->[-1] =~ s/\015?\012\z//) |
|
206
|
0 |
0 |
if @$seps == 1 and @$lines > 1 and length $lines->[-1] == 0 |
|
210
|
0 |
0 |
ref $file eq 'Mail::Box::FastScalar' ? : |
|
214
|
0 |
0 |
if ($self->stripGt) |
|
218
|
0 |
0 |
unless ($self->trusted) |
|
243
|
0 |
0 |
if (defined $exp_chars and $exp_chars >= 0) |
|
247
|
0 |
0 |
if ($self->_is_good_end($end)) |
|
249
|
0 |
0 |
if $self->stripGt |
|
283
|
0 |
0 |
if (defined $exp_chars) |
|
286
|
0 |
0 |
if ($self->_is_good_end($end)) |
|
303
|
0 |
0 |
unless my $fh = $self->{'MBPP_file'} = $args{'file'} || 'IO::File'->new($self->filename, $args{'mode'} || $self->openMode) |
|
306
|
0 |
0 |
if $fh->can("binmode") or $fh->can("BINMODE") |
|
318
|
0 |
0 |
unless my $file = delete $self->{'MBPP_file'} |