Branch Coverage

blib/lib/Math/Roman.pm
Criterion Covered Total %
branch 33 46 71.7


line true false branch
68 0 5785 unless defined $value
78 1064 4721 if ($value =~ /[IVXLCDM]/) { }
4720 1 elsif (length $value) { }
100 0 3 if @_ == 0
111 45 20 if (int $sym[$i + 1] != -1)
115 19 26 if int $sym[$i + 1] > $bv
119 0 104 unless length $b <=> length $a
126 0 3 if @_ == 0
212 3714 0 if (defined $1) { }
222 29 1035 if $e != 0
233 5 3709 if (not defined $k) { }
240 7 3702 if ($k == -1)
245 1059 2650 if $$last == -1
247 17 3692 if ($k > $$last)
253 29 3685 if $$error != 0
261 0 1033 unless ref $x
262 1 1032 if $x->is_zero
263 0 1032 if $x->is_nan
276 13047 3652 if $ss->[$level] > $rem
279 0 3652 if ($rem->sign eq 'NaN')
286 3652 0 if $cnt != 0
328 0 0 if $$value >= $rem
339 0 0 if $$value == $rem