| line |
true |
false |
branch |
|
34
|
1 |
59 |
unless defined $n1 or defined $n2 |
|
35
|
1 |
58 |
unless defined $n1 |
|
36
|
1 |
58 |
unless defined $n2 |
|
39
|
4 |
55 |
if $n1 == 0 |
|
40
|
4 |
51 |
if $n2 == 0 |
|
44
|
6 |
45 |
$m1 > $m2 ? : |
|
47
|
3 |
48 |
$n < 0 ? : |
|
48
|
3 |
48 |
if $n < 0 |
|
53
|
14 |
37 |
if ($m > 0) { } |
|
|
20 |
17 |
elsif ($i > 0) { } |
|
54
|
10 |
4 |
if ($l >= $m + 1) { } |
|
|
2 |
2 |
elsif ($l == $m) { } |
|
57
|
1 |
1 |
if ($i =~ /^[5-9]/) { } |
|
74
|
13 |
4 |
if ($m > length $z) { } |
|
|
2 |
2 |
elsif ($m == length $z) { } |
|
78
|
1 |
1 |
if ($d =~ /^[5-9]/) { } |
|
94
|
1 |
18 |
unless defined $n1 or defined $n2 |
|
95
|
1 |
17 |
unless defined $n1 |
|
96
|
1 |
17 |
unless defined $n2 |
|
99
|
6 |
12 |
if ($n2 < 0) { } |
|
109
|
1 |
9 |
unless defined $n1 or defined $n2 |
|
110
|
2 |
5 |
if not defined $n1 && defined $n2 or $n1 == 0 or $n2 == 0 |
|
116
|
1 |
4 |
$m1 < $m2 ? : |
|
123
|
1 |
9 |
unless defined $n1 or defined $n2 |
|
124
|
2 |
7 |
if not defined $n1 or $n1 == 0 |
|
125
|
2 |
5 |
if not defined $n2 or $n2 == 0 |
|
131
|
1 |
4 |
$m1 < $m2 ? : |
|
140
|
3 |
207 |
unless defined $N and $n =~ /^\d+$/ and $n > 0 |
|
144
|
3 |
204 |
if $N == 0 |
|
146
|
170 |
34 |
if $N =~ /\./ |
|
147
|
59 |
145 |
if $N =~ /^\./ |
|
159
|
35 |
169 |
if ($m == $n) |
|
160
|
1 |
34 |
if length $N == $n |
|
166
|
48 |
121 |
if ($m < $n) |
|
167
|
33 |
15 |
if ($N =~ /\./) |
|
178
|
4 |
11 |
if $l > $n |
|
187
|
12 |
109 |
unless $N =~ /\./ |
|
188
|
30 |
91 |
if ($N =~ /^0\.(0*)(\d*)$/) |
|
194
|
23 |
7 |
if $n == $m |
|
202
|
1 |
6 |
if $l == 0 |
|
218
|
49 |
42 |
if ($n >= $l1) |
|
223
|
34 |
15 |
if ($m == $n) |
|
224
|
13 |
21 |
if $l == 0 and $m == length $ret |
|
232
|
11 |
4 |
if ($l >= 0) |
|
234
|
9 |
2 |
if $l == 0 |
|
255
|
10 |
32 |
if ($m >= 1) |
|
269
|
1 |
341 |
unless defined $N |
|
270
|
2 |
339 |
if $N == 0 |
|
273
|
84 |
255 |
if ($N =~ /^\d+$/) { } |
|
|
94 |
161 |
elsif ($N =~ /^\.0*(\d+)$/) { } |
|
296
|
84 |
24 |
if ($n =~ /(.*)\.(.+)/) { } |
|
|
2 |
22 |
elsif ($n =~ /\.$/) { } |
|
312
|
2 |
722 |
unless defined $n |
|
313
|
721 |
1 |
if ($n =~ /^\s*([+-]?)\s*0*(\.\d+)\s*$/ or $n =~ /^\s*([+-]?)\s*0*(\d+\.?\d*)\s*$/) |
|
316
|
19 |
702 |
if $num == 0 |