Branch Coverage

blib/lib/Number/Fraction.pm
Criterion Covered Total %
branch 63 64 98.4


line true false branch
142 8 4 if $_[1] and $_[1] eq ':constants'
197 53 140 if (@_ >= 2) { }
139 1 elsif (@_ == 1) { }
198 2 51 unless $_[0] =~ /^-?[0-9]+\z/ and $_[1] =~ /^-?[0-9]+\z/
203 2 137 if (ref $_[0]) { }
204 1 1 if (UNIVERSAL::isa($_[0], $class)) { }
212 12 124 unless $_[0] =~ m[^(-?[0-9]+)(?:/(-?[0-9]+))?\z]
215 121 3 defined $2 ? :
238 4 172 if ($$self{'den'} < 0)
255 14 89 if ($$self{'den'} == 1) { }
289 10 2 if (ref $r) { }
290 9 1 if (UNIVERSAL::isa($r, ref $l)) { }
297 1 1 if ($r =~ /^[-+]?\d+$/) { }
318 10 2 if (ref $r) { }
319 9 1 if (UNIVERSAL::isa($r, ref $l)) { }
326 1 1 if ($r =~ /^[-+]?\d+$/) { }
347 11 4 if (ref $r) { }
348 10 1 if (UNIVERSAL::isa($r, ref $l)) { }
355 2 2 if ($r =~ /^[-+]?\d+$/) { }
357 1 1 $rev ? :
359 1 1 $rev ? :
377 11 4 if (ref $r) { }
378 10 1 if (UNIVERSAL::isa($r, ref $l)) { }
385 2 2 if ($r =~ /^[-+]?\d+$/) { }
387 1 1 $rev ? :
389 1 1 $rev ? :
409 1 5 if ($rev)
413 2 3 if (UNIVERSAL::isa($r, ref $l)) { }
3 0 elsif ($r =~ /^[-+]?\d+$/) { }
414 1 1 if ($$r{'den'} == 1) { }
429 148 28 if $y > $x
431 9 167 if $x == $y