| line |
true |
false |
branch |
|
26
|
0 |
7 |
unless $self->SUPER::init($args) |
|
36
|
0 |
2 |
if $sep eq 'From ' |
|
43
|
0 |
2 |
if $sep eq 'From ' |
|
49
|
0 |
2 |
@_ ? : |
|
64
|
12 |
34 |
if $line =~ /$empty/ |
|
67
|
0 |
34 |
unless (defined $body) |
|
71
|
0 |
0 |
if (@ret and $self->fixHeaderErrors) { } |
|
82
|
0 |
34 |
unless length $body |
|
86
|
3 |
34 |
$line =~ /^[ \t]/ ? : |
|
102
|
0 |
0 |
unless defined $sep |
|
106
|
0 |
0 |
unless $file->seek($where, 0) |
|
114
|
0 |
0 |
unless defined $line |
|
116
|
0 |
0 |
if substr($line, 0, length $sep) eq $sep |
|
124
|
0 |
6 |
unless defined $sep |
|
135
|
0 |
6 |
unless defined $line |
|
138
|
6 |
0 |
if substr($line, 0, length $sep) eq $sep |
|
153
|
6 |
7 |
if (@seps) { } |
|
158
|
0 |
24 |
unless my $line = $file->getline |
|
162
|
33 |
6 |
if substr($line, 0, length $sep) ne $sep |
|
165
|
0 |
6 |
if $sep eq 'From ' and not $line =~ / 19[789][0-9]| 20[0-9][0-9]/ |
|
175
|
5 |
1 |
if (@$lines and $lines->[-1] =~ s/(\r?\n)\z//) |
|
176
|
5 |
0 |
if length $lines->[-1] == 0 |
|
180
|
7 |
0 |
ref $file eq 'Mail::Box::FastScalar' ? : |
|
185
|
13 |
0 |
if ($lines) |
|
186
|
0 |
13 |
if ($self->{'MBPP_strip_gt'}) |
|
189
|
0 |
13 |
unless ($self->{'MBPP_trusted'}) |
|
217
|
0 |
0 |
if (defined $exp_chars and $exp_chars >= 0) |
|
221
|
0 |
0 |
if ($self->_is_good_end($end)) |
|
223
|
0 |
0 |
if $self->{'MBPP_strip_gt'} |
|
257
|
0 |
0 |
if (defined $exp_chars) |
|
260
|
0 |
0 |
if ($self->_is_good_end($end)) |
|
273
|
0 |
7 |
unless my $mode = $args->{'mode'} |
|
276
|
0 |
7 |
unless $fh |
|
279
|
7 |
0 |
if $fh->can('binmode') or $fh->can('BINMODE') |
|
294
|
7 |
7 |
unless my $file = delete $self->{'MBPP_file'} |
|
304
|
0 |
0 |
@_ ? : |