| line |
true |
false |
branch |
|
31
|
2324 |
5687 |
if $q <= 0 and $k > 0 |
|
32
|
2407 |
3280 |
if $q >= 7 and $k < 60 |
|
38
|
0 |
1077 |
if ref $_[0] eq 'CODE' |
|
41
|
0 |
1077 |
unless $k >= 0 |
|
48
|
2 |
4008 |
unless defined $val and $val >= 0 |
|
49
|
25 |
3983 |
if ($k == 0) { } |
|
51
|
2 |
23 |
if $val >= 7 |
|
55
|
1 |
3982 |
if (@q_list) { } |
|
57
|
0 |
1 |
defined $sub ? : |
|
60
|
0 |
3982 |
defined $sub ? : |
|
66
|
14 |
1061 |
if (@q_list) |
|
67
|
0 |
14 |
defined $sub ? : |
|
74
|
0 |
1229 |
if ref $_[0] eq 'CODE' |
|
77
|
0 |
1229 |
unless $k >= 0 |
|
80
|
1076 |
153 |
if (not defined $count) { } |
|
|
24 |
129 |
elsif ($count < 0) { } |
|
|
0 |
129 |
elsif ($count == 0) { } |
|
90
|
13 |
4035 |
if ($k == 0 and $count > 0) { } |
|
91
|
0 |
13 |
defined $sub ? : |
|
92
|
3 |
10 |
unless defined $q1 |
|
98
|
0 |
4035 |
defined $sub ? : |
|
100
|
22 |
4018 |
unless defined $q |
|
101
|
15 |
4003 |
if ($k == 0) { } |
|
105
|
0 |
4003 |
unless defined $remainder |
|
112
|
411 |
813 |
wantarray ? : |