| line |
true |
false |
branch |
|
37
|
4904 |
2450 |
if ref $_[0] eq 'CODE' |
|
39
|
0 |
7354 |
unless $m >= 1 |
|
41
|
1 |
1 |
defined $sub ? : |
|
|
2 |
7352 |
if $m == 1 |
|
47
|
10 |
27979 |
unless defined $val and $val >= 0 |
|
56
|
0 |
27979 |
unless $r >= 0 and $r < $m and $q == int $q and $q * $m + $r == $val |
|
58
|
20955 |
7024 |
defined $sub ? : |
|
60
|
13599 |
14380 |
if ($r < $threshold) { } |
|
70
|
4947 |
2511 |
if ref $_[0] eq 'CODE' |
|
72
|
0 |
7458 |
unless $m >= 1 |
|
74
|
1 |
1 |
defined $sub ? : |
|
|
2 |
7456 |
if $m == 1 |
|
80
|
7249 |
207 |
if (not defined $count) { } |
|
|
207 |
0 |
elsif ($count < 0) { } |
|
|
0 |
0 |
elsif ($count == 0) { } |
|
86
|
1674 |
5782 |
if ($threshold == 0) { } |
|
89
|
3539 |
2383 |
defined $sub ? : |
|
90
|
47 |
5875 |
unless defined $q |
|
93
|
0 |
5875 |
unless defined $remainder |
|
99
|
17607 |
4771 |
defined $sub ? : |
|
100
|
165 |
22205 |
unless defined $q |
|
103
|
1 |
22204 |
unless defined $remainder |
|
104
|
8577 |
13627 |
if ($remainder >= $threshold) |
|
106
|
0 |
8577 |
unless defined $extra |
|
113
|
207 |
7240 |
wantarray ? : |