| line |
true |
false |
branch |
|
21
|
822 |
1634 |
if ref $_[0] eq 'CODE' |
|
24
|
0 |
2456 |
unless $k >= 0 |
|
25
|
0 |
1 |
defined $sub ? : |
|
|
1 |
2455 |
if $k == 0 |
|
28
|
6 |
8179 |
unless defined $val and $val >= 0 |
|
31
|
3496 |
4683 |
defined $sub ? : |
|
38
|
846 |
1676 |
if ref $_[0] eq 'CODE' |
|
41
|
0 |
2522 |
unless $k >= 0 |
|
42
|
0 |
1 |
defined $sub ? : |
|
|
1 |
2521 |
if $k == 0 |
|
45
|
2455 |
66 |
if (not defined $count) { } |
|
|
66 |
0 |
elsif ($count < 0) { } |
|
|
0 |
0 |
elsif ($count == 0) { } |
|
53
|
3546 |
4771 |
defined $sub ? : |
|
54
|
69 |
8240 |
unless defined $q |
|
56
|
1 |
8239 |
unless defined $remainder |
|
60
|
66 |
2446 |
wantarray ? : |