Branch Coverage

blib/lib/Email/Outlook/Message/Base.pm
Criterion Covered Total %
branch 31 52 59.6


line true false branch
229 55 26 unless $key eq $name
231 21 5 if ($prop) { }
244 82 20 if ($encoding eq $ENCODING_ASCII or $encoding eq $ENCODING_UNICODE)
245 22 60 if ($encoding eq $ENCODING_UNICODE)
252 7 13 if ($encoding eq $ENCODING_BINARY)
256 8 5 if ($encoding eq $ENCODING_DATE)
261 0 5 if ($encoding eq $ENCODING_INTEGER16)
265 5 0 if ($encoding eq $ENCODING_INTEGER32)
269 0 0 if ($encoding eq $ENCODING_BOOLEAN)
280 14 221 if ($child->{'Type'} == $DIR_TYPE) { }
221 0 elsif ($child->{'Type'} == $FILE_TYPE) { }
302 207 14 if ($name =~ / ^ __substg1 [ ] 0_ (....) (....) $ /x) { }
314 6 0 if ($name eq '__nameid_version1 0') { }
317 0 6 if $self->{'VERBOSE'}
329 0 0 if ($name eq 'Olk10SideProps_0001') { }
331 0 0 if $self->{'VERBOSE'}
347 207 14 if (defined $property) { }
14 0 elsif ($name eq '__properties_version1 0') { }
366 133 207 unless ($Email::Outlook::Message::Base::VARIABLE_ENCODINGS->{$encoding})
381 81 259 if (my $key = $map->{$property}) { }
396 0 81 if $self->{'VERBOSE'}
403 259 0 unless $self->{'VERBOSE'}
418 0 0 if ($encoding eq $ENCODING_BINARY)
419 0 0 if ($value =~ / [[:print:]] /x) { }
426 0 0 if (length $value > 45)
436 0 14 $verbosity ? :