line |
true |
false |
branch |
48
|
3 |
0 |
int($x * 1e-05) * 100000 == $x ? : |
61
|
2944 |
38 |
if (s/^([+-]?)0*(\d+)$/$1$2/) { } |
62
|
3 |
2941 |
unless $1 |
90
|
38 |
5 |
unless $_ eq "+0" |
91
|
3 |
40 |
unless /^[-+]/ |
109
|
2 |
205 |
if ($x eq 'NaN') { } |
|
1 |
204 |
elsif ($y eq 'NaN') { } |
120
|
62 |
404 |
if $cx eq $cy |
125
|
394 |
10 |
if ($sx eq '+') { } |
126
|
13 |
381 |
if $sy eq "-" or $cy eq "+0" |
128
|
243 |
138 |
if $ld |
131
|
2 |
8 |
if $sy eq "+" |
133
|
4 |
4 |
if $ld |
141
|
4 |
262 |
if ($x eq 'NaN') { } |
|
2 |
260 |
elsif ($y eq 'NaN') { } |
149
|
189 |
71 |
if ($sx eq $sy) { } |
153
|
34 |
37 |
if (&cmp($y, $x) > 0) { } |
169
|
3 |
8 |
if ($x eq 'NaN' or $y eq 'NaN') { } |
184
|
48 |
7 |
unless @y or $car |
185
|
125 |
328 |
($x += shift(@y) + $car) >= 100000 ? : |
|
125 |
328 |
if $car = ($x += shift(@y) + $car) >= 100000 ? 1 : 0 |
188
|
6 |
7 |
unless $car |
189
|
2 |
5 |
($y += $car) >= 100000 ? : |
|
2 |
5 |
if $car = ($y += $car) >= 100000 ? 1 : 0 |
199
|
6 |
7 |
unless @y or $bar |
200
|
22 |
78 |
if $bar = ($sx -= shift(@sy) + $bar) < 0 |
208
|
2 |
300 |
if ($x eq 'NaN') { } |
|
1 |
299 |
elsif ($y eq 'NaN') { } |
215
|
12 |
287 |
shift @x ne shift @y ? : |
221
|
0 |
741 |
if ($use_mult) { } |
230
|
249 |
466 |
if $car |
244
|
6 |
6 |
wantarray ? : |
|
8 |
176 |
if $x eq "NaN" or $y eq "NaN" or $y eq "+0" |
246
|
8 |
3 |
wantarray ? : |
|
11 |
165 |
if &cmp(&abs($x), &abs($y)) < 0 |
249
|
7 |
158 |
shift @x ne shift @y ? : |
251
|
162 |
3 |
if (($dd = int 100000 / ($y[$#y] + 1)) != 1) { } |
254
|
0 |
1008 |
if ($use_mult) { } |
264
|
0 |
288 |
if ($use_mult) { } |
278
|
5 |
892 |
$u0 == $v1 ? : |
280
|
570 |
327 |
if ($q) |
284
|
0 |
2583 |
if ($use_mult) { } |
290
|
1266 |
1317 |
if $bar = ($x[$x] -= $prd + $bar) < 0 |
292
|
5 |
565 |
if ($x[$#x] < $car + $bar) |
295
|
19 |
25 |
if $car = ($x[$x] += $y[$y] + $car) > 100000 |
302
|
138 |
27 |
if (wantarray) { } |
304
|
136 |
2 |
if ($dd != 1) { } |