line |
true |
false |
branch |
25
|
0 |
392 |
unless defined $self->{'file_handle'} |
77
|
2663 |
3506 |
if eof $self->{'file_handle'} |
109
|
22 |
2264 |
if $self->end_of_file |
118
|
0 |
2264 |
unless ($self->_read_header) |
123
|
60 |
2204 |
unless ($self->_read_email_parts) |
137
|
30 |
30 |
if (defined $content_length) { } |
187
|
0 |
5390 |
if $backup_amount > $self->{'END_OF_EMAIL'} - $self->{'START_OF_EMAIL'} |
194
|
113 |
3597 |
if $end_of_string =~ /$endline-----(?: Begin Included Message |Original Message)-----${endline}[^\r\n]*(?:$endline)*$/i |
197
|
1747 |
1850 |
unless $end_of_string =~ /$endline$endline$/ |
218
|
0 |
566 |
if length $self->{'READ_BUFFER'} < $backup_amount |
224
|
234 |
332 |
if ($shift_amount == 0) { } |
231
|
414 |
152 |
unless ($self->_read_until_match(qr/$Mail::Mbox::MessageParser::Config{'from_pattern'}/m, $backup_amount)) |
250
|
675 |
1649 |
if (substr($self->{'READ_BUFFER'}, $self->{'START_OF_EMAIL'}, $self->{'START_OF_BODY'} - $self->{'START_OF_EMAIL'}) =~ /^(content-type: *multipart[^\n\r]*$endline( [^\n\r]*$endline)*)/im) |
257
|
675 |
0 |
if ($content_type_header =~ /boundary *= *"([^"]*)"/i or $content_type_header =~ m[boundary *= *([-0-9A-Za-z'()+_,./:=? ]*[-0-9A-Za-z'()+_,./:=?])]i) |
275
|
1649 |
615 |
unless defined $boundary |
282
|
60 |
555 |
unless $self->_read_until_match(qr/^--\Q$boundary\E--$endline/m, 76) |
315
|
0 |
2264 |
unless $self->_read_until_match(qr/$self->{'endline'}$self->{'endline'}/m, 0) |
336
|
790 |
3047 |
if (not defined pos $self->{'READ_BUFFER'} or pos($self->{'READ_BUFFER'}) - $backup <= 0) { } |
345
|
3363 |
1318 |
if ($self->{'READ_BUFFER'} =~ /($pattern)/gm) |
353
|
474 |
844 |
unless ($self->_read_chunk) |
358
|
432 |
412 |
if (pos($self->{'READ_BUFFER'}) - $backup <= 0) { } |
376
|
0 |
1318 |
if ($self->{'READ_CHUNK_SIZE'} == 0) { } |
380
|
0 |
0 |
if eof $self->{'file_handle'} |
400
|
892 |
844 |
if ($amount_read == 0) |
402
|
418 |
474 |
unless $total_amount_read == 0 |