Branch Coverage

lib/HTTP/Promise/MIME.pm
Criterion Covered Total %
branch 10 24 41.6


line true false branch
23 3 0 $@ ? :
36 1 2 if @_ % 2
39 0 3 unless $self->SUPER::init(@_)
42 1 2 if (defined $file) { }
0 2 elsif (scalar keys %$HTTP::Promise::MIME::TYPES) { }
66 0 0 unless ($max = $self->{'_dump_max_width'})
70 0 0 if length $t > $max
93 0 0 if ($HTTP::Promise::MIME::HAS_FILE_MMAGIC_XS) { }
105 0 0 if ($@)
121 0 0 if (scalar grep(($_ eq $suff), @$ar))
136 0 1 wantarray ? :
150 1089 767 if /^[[:blank:]\h]*\#/ or /^[[:blank:]\h]*$/