Branch Coverage

blib/lib/Math/BaseCalc.pm
Criterion Covered Total %
branch 20 22 90.9


line true false branch
18 23 0 if (@_)
22 16 7 if (ref $_[0]) { }
27 0 7 unless exists $digitsets{$name}
31 2 254 if ($digit eq '-') { }
1 253 elsif ($digit eq '.') { }
60 3 64 if not $self->{'has_dash'} and $_[0] =~ /^-/
66 2 62 if (not $self->{'has_dot'} and $str =~ s/\.(.+)//)
75 2 246 unless exists $$trans{substr $str, 0, 1}
81 2 60 $add_in ? :
86 1 56 if $num < 0
97 52 4 length $result ? :