Branch Coverage

blib/lib/Mail/Mbox/MessageParser/Grep.pm
Criterion Covered Total %
branch 3 52 5.7


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) { }