Branch Coverage

blib/lib/Math/FractionDemo.pm
Criterion Covered Total %
branch 16 30 53.3


line true false branch
51 0 47 if (not $test) { }
0 47 elsif ($test eq 'TESTCREATE') { }
57 34 13 if ("$ans" eq "$_[1]") { }
68 0 27 if (not $test) { }
0 27 elsif ($test eq 'TESTCREATE') { }
78 0 6 if (not $test) { }
0 6 elsif ($test eq 'TESTCREATE') { }
79 0 0 if ($output eq 'STDOUT') { }
93 1 24 $_ eq undef() ? :
101 1 0 if ($_[1] eq 'TEST' or $_[1] eq 'TESTCREATE') { }
109 0 1 unless $test
111 1 0 if $test eq 'TEST'
194 0 1 unless $test
195 0 1 unless $test
197 1 0 if $test eq 'TEST'