Branch Coverage

blib/lib/MIME/Head.pm
Criterion Covered Total %
branch 25 34 73.5


line true false branch
219 9 869 if ($self->count($hdr) > 1)
225 7 413 if ($self->mime_attr($hdr . '.@duplicate_parameters'))
228 4 409 if ($self->mime_attr($hdr . '.@empty_parameters'))
265 2 4 ref $self ? :
268 1 5 unless my $fh = "IO::File"->new($file, "<")
269 0 5 unless $fh->binmode
271 0 5 unless $fh->close
304 0 201 unless ref $self
450 2 0 unless ($force eq "I_NEED_TO_FIX_THIS" or $force eq "I_KNOW_WHAT_I_AM_DOING")
560 0 21 unless $self->count($tag)
627 418 0 defined $_ ? :
629 418 0 /\n$/ ? :
775 11 2628 if (@_ > 2) { }
838 4 989 if @_ > 1
843 993 0 if $] <= "5.008" or $] >= "5.014"
872 0 86 !defined($value) ? :
897 77 3 if (defined $value and $value ne "" and $value =~ /\S/)