Branch Coverage

blib/lib/Text/APL/Writer.pm
Criterion Covered Total %
branch 10 12 83.3


line true false branch
14 1 23 if (not ref $output) { }
1 22 elsif (ref $output eq 'GLOB') { }
21 1 elsif (ref $output eq 'SCALAR') { }
1 0 elsif (ref $output eq 'CODE') { }
15 0 1 unless open my $fh, '>', $output
23 24 20 if defined $_[0]