Branch Coverage

blib/lib/Email/Outlook/Message.pm
Criterion Covered Total %
branch 57 66 86.3


line true false branch
117 1 12 unless my $file = shift()
126 0 12 unless $pps
151 14 2 if ($self->{'BODY_PLAIN'})
152 4 12 if ($self->{'BODY_HTML'})
153 10 6 if ($self->{'BODY_RTF'})
155 13 3 if (scalar @parts > 1) { }
2 1 elsif (@parts == 1) { }
171 4 12 if (@{$self->{'ATTACHMENTS'};} > 0) { }
225 12 16 if ($name =~ /__recip_version1 0_ /) { }
4 12 elsif ($name =~ /__attach_version1 0_ /) { }
266 0 12 $self->{'EMBEDDED'} ? :
278 14 14 unless (defined $self->{'OLEDATE'})
282 4 10 unless $datearr and $datearr->[0]
283 10 4 if $datearr and $datearr->[0]
297 12 5 unless my $submission_id = $self->{'SUBMISSION_ID'}
298 0 5 unless $submission_id =~ / l=.*- (\d\d) (\d\d) (\d\d) (\d\d) (\d\d) (\d\d) Z-.* /x
301 5 0 if $year < 20
320 66 110 if $value
330 6 10 if ($address)
331 6 0 if $result
342 10 22 unless defined $names
348 10 2 if ($addresstext) { }
363 10 2 if ($name eq $address->name)
374 28 6 unless ($part->content_type =~ m[ ^ multipart / ]x)
396 4 15 if (defined $body_encoding and $body_encoding eq '001F') { }
6 9 elsif (defined $codepage) { }
409 9 6 if ($charset ne "UTF-8")
457 10 0 if ($magic == $MAGIC_COMPRESSED_RTF) { }
0 0 elsif ($magic == $MAGIC_UNCOMPRESSED_RTF) { }
463 120 792 if (@flags == 0)
467 390 522 if ($flag eq '0') { }
475 0 522 if ($longoffset >= $buflen)
504 6 11 unless defined $self->{'HEAD'}