Branch Coverage

blib/lib/Email/Outlook/Message.pm
Criterion Covered Total %
branch 47 60 78.3


line true false branch
107 1 5 unless my $file = shift()
116 0 5 unless $pps
141 7 2 if ($self->{'BODY_PLAIN'})
142 2 7 if ($self->{'BODY_HTML'})
143 5 4 if ($self->{'BODY_RTF'})
145 6 3 if (scalar @parts > 1) { }
2 1 elsif (@parts == 1) { }
161 2 7 if (@{$self->{'ATTACHMENTS'};} > 0) { }
215 5 7 if ($name =~ /__recip_version1 0_ /) { }
2 5 elsif ($name =~ /__attach_version1 0_ /) { }
256 0 5 $self->{'EMBEDDED'} ? :
268 5 7 unless (defined $self->{'OLEDATE'})
272 0 5 unless $datearr and $datearr->[0]
273 5 0 if $datearr and $datearr->[0]
287 5 5 unless my $submission_id = $self->{'SUBMISSION_ID'}
288 0 5 unless $submission_id =~ / l=.*- (\d\d) (\d\d) (\d\d) (\d\d) (\d\d) (\d\d) Z-.* /x
291 5 0 if $year < 20
310 30 69 if $value
320 2 7 if ($address)
321 2 0 if $result
332 8 10 unless defined $names
338 5 0 if ($addresstext) { }
353 5 0 if ($name eq $address->name)
364 13 3 unless ($part->content_type =~ m[ ^ multipart / ]x)
415 5 0 if ($magic == $MAGIC_COMPRESSED_RTF) { }
0 0 elsif ($magic == $MAGIC_UNCOMPRESSED_RTF) { }
421 60 396 if (@flags == 0)
425 195 261 if ($flag eq '0') { }
433 0 261 if ($longoffset >= $buflen)
462 3 7 unless defined $self->{'HEAD'}