| line |
true |
false |
branch |
|
31
|
0 |
15 |
unless defined $self->{'file_name'} |
|
32
|
0 |
15 |
unless defined $self->{'file_handle'} |
|
35
|
15 |
0 |
unless defined $Mail::Mbox::MessageParser::Config{'programs'}{'grep'} |
|
89
|
0 |
0 |
if eof $self->{'file_handle'} |
|
119
|
0 |
0 |
unless (defined $self->{'file_name'} and _ENTRY_STILL_VALID($self->{'file_name'})) |
|
138
|
0 |
0 |
if $self->end_of_file |
|
149
|
0 |
0 |
unless ($self->_read_header) |
|
154
|
0 |
0 |
unless ($self->_read_email_parts) |
|
168
|
0 |
0 |
if (defined $content_length) { } |
|
218
|
0 |
0 |
if $end_of_string =~ /$endline-----(?: Begin Included Message |Original Message)-----${endline}[^\r\n]*(?:$endline)*$/i |
|
221
|
0 |
0 |
unless $end_of_string =~ /$endline$endline$/ |
|
240
|
0 |
0 |
unless ($self->_read_until_match(qr/$Mail::Mbox::MessageParser::Config{'from_pattern'}/m, 90)) |
|
259
|
0 |
0 |
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) |
|
266
|
0 |
0 |
if ($content_type_header =~ /boundary *= *"([^"]*)"/i or $content_type_header =~ m[boundary *= *([-0-9A-Za-z'()+_,./:=? ]*[-0-9A-Za-z'()+_,./:=?])]i) |
|
284
|
0 |
0 |
unless defined $boundary |
|
289
|
0 |
0 |
unless $self->_read_until_match(qr/^--\Q$boundary\E--$endline/m, 76) |
|
325
|
0 |
0 |
unless $self->_read_until_match(qr/$self->{'endline'}$self->{'endline'}/m, 0) |
|
346
|
0 |
0 |
if (not defined pos $self->{'READ_BUFFER'} or pos($self->{'READ_BUFFER'}) - $backup <= 0) { } |
|
355
|
0 |
0 |
if ($self->{'READ_BUFFER'} =~ /($pattern)/gm) |
|
363
|
0 |
0 |
unless ($self->_read_chunk) |
|
368
|
0 |
0 |
if (pos($self->{'READ_BUFFER'}) - $backup <= 0) { } |
|
386
|
0 |
0 |
if ($self->{'CHUNK_INDEX'} == -1) |
|
403
|
0 |
0 |
if $self->{'CHUNK_INDEX'} == $last_email_index + 1 |
|
433
|
0 |
0 |
if $self->{'email_number'} == $last_email_index |
|
438
|
0 |
0 |
if ($self->{'email_number'} + 2 <= $last_email_index) |
|
497
|
0 |
0 |
if ($match_number == $#lines_and_offsets) { } |