Branch Coverage

blib/lib/Lingua/SWE/Num2Word.pm
Criterion Covered Total %
branch 11 52 21.1


line true false branch
24 0 7 if $positive < 0
31 2 5 if $positive < 20
33 0 5 if ($positive < 100) { }
3 2 elsif ($positive < 1000) { }
2 0 elsif ($positive < 1000000) { }
0 0 elsif ($positive < 1000000000) { }
37 0 0 if $num[1]
43 0 3 if (int $num[1] . $num[2] < 20 and int $num[1] . $num[2] > 0) { }
46 3 0 if $num[1]
47 3 0 if $num[2]
55 2 0 if int join("", @sub) > 0
62 0 0 if int join("", @sub) > 0
75 0 0 if not defined $number && $number =~ /\A\d+\z/msux or $number < 1 or $number > 999999999
81 0 0 if $number == 1
82 0 0 if $number == 2
83 0 0 if $number == 3
97 0 0 if exists $irregular{$number}
109 0 0 if exists $teens{$number}
124 0 0 if ($number < 100)
127 0 0 if $ones == 0
135 0 0 if ($number < 1000)
139 0 0 if ($remain == 0)
147 0 0 if ($number < 1000000)
149 0 0 if ($remain == 0)
156 0 0 if ($number < 1000000000)
158 0 0 if ($remain == 0)