Branch Coverage

blib/lib/MIME/Decoder.pm
Criterion Covered Total %
branch 21 32 65.6


line true false branch
171 0 198 unless ($concrete_name)
178 0 198 unless (eval "require $concrete_name;")
204 0 64 unless ($self)
234 0 127 unless $self->decode_it($in, $out)
259 8 64 $self->encoding eq 'quoted-printable' ? :
0 72 unless $self->encode_it($in, $out, $self->encoding eq 'quoted-printable' ? $textual_type : ())
292 64 2 if @_ > 1
325 0 0 defined $decoder ? :
432 0 0 unless (defined $read or defined $write)
439 6 6 if (my $fh = shift @$read)
440 4 2 if ($fh->sysread(my $buf, 1024)) { }
449 6 6 if (my $fh = shift @$write)
450 4 2 if ($in->read(my $buf, 1024)) { }
464 2 10 unless $rsel->count or $wsel->count
468 0 2 unless waitpid($kidpid, 0) == $kidpid
470 0 2 unless $? == 0