| line |
true |
false |
branch |
|
36
|
0 |
13 |
unless $money =~ /^(?:\d)+(?:\.(?:\d)+)?$/ |
|
38
|
0 |
13 |
if $money == 0 |
|
47
|
12 |
1 |
if $$self{'integer'} != 0 |
|
48
|
5 |
8 |
if defined $$self{'decimal'} and $$self{'decimal'} != 0 |
|
56
|
12 |
1 |
if $$self{'integer'} != 0 |
|
57
|
5 |
8 |
if (defined $$self{'decimal'} and $$self{'decimal'} != 0) { } |
|
70
|
5 |
0 |
if length $$self{'decimal'} != 1 |
|
71
|
0 |
5 |
$cent[0] == 0 ? : |
|
72
|
5 |
0 |
if $cent[1] |
|
85
|
11 |
12 |
if length $digit[$i] != 4 |
|
91
|
3 |
20 |
if $_ eq '0000' |
|
95
|
15 |
5 |
$1 == 0 ? : |
|
96
|
13 |
7 |
$2 == 0 ? : |
|
97
|
5 |
15 |
$3 == 0 ? : |
|
98
|
14 |
6 |
$4 == 0 ? : |
|
99
|
7 |
13 |
if ($i % 2 == 0) |
|
101
|
5 |
2 |
if $4 == 0 |
|
103
|
3 |
17 |
if ($i > 2) |
|
105
|
3 |
0 |
if $4 == 0 |