Branch Coverage

blib/lib/Mail/Message/Body/String.pm
Criterion Covered Total %
branch 6 14 42.8


line true false branch
34 0 0 unless open my $in, "<:raw", $filename
47 0 1 if (ref $fh eq 'Mail::Box::FastScalar') { }
62 1 0 unless @$lines == 1
63 0 1 @$lines == 1 ? :
74 2 0 if defined $self->{'MMBS_nrlines'}
77 0 0 unless $self->{'MMBS_scalar'} =~ /\n\z/
86 2 1 wantarray ? :