Branch Coverage

blib/lib/Pipe/Tube/Print.pm
Criterion Covered Total %
branch 6 10 60.0


line true false branch
13 4 0 if ($file)
14 2 2 if (not ref $file) { }
2 0 elsif ('GLOB' eq ref $file) { }
15 0 2 unless open my $fh, ">", $file
31 28 0 if (my $fh = $self->{'fh'}) { }