Branch Coverage
blib/lib/PerlIO/via/Babelfish.pm
Criterion
Covered
Total
%
branch
3
8
37.5
line
true
false
branch
14
0
1
ref $_[0] ? :
39
0
0
if (ref $fish and defined $line) { }
55
0
1
ref $fish ? :
69
0
3
unless print $fh $$obj