| line |
true |
false |
branch |
|
16
|
8 |
39994 |
if &$f() |
|
26
|
5 |
24999 |
unless &$f() |
|
36
|
5 |
39996 |
if &$f() |
|
46
|
6 |
19999 |
unless &$f() |
|
57
|
10 |
2656 |
if &$f() and $found++ |
|
65
|
1 |
12 |
unless @_ |
|
73
|
1 |
8 |
unless @_ |
|
81
|
1 |
8 |
unless @_ |
|
89
|
1 |
8 |
unless @_ |
|
97
|
1 |
15 |
unless @_ |
|
101
|
10 |
2656 |
if &$f() and $found++ |
|
128
|
20 |
50026 |
if &$f() |
|
138
|
4 |
16 |
if &$test() |
|
149
|
4 |
16 |
if $testval |
|
161
|
3498 |
22 |
unless &$f() |
|
162
|
8 |
14 |
if defined $found |
|
165
|
6 |
2 |
defined $found ? : |
|
175
|
3498 |
22 |
unless &$test() |
|
177
|
8 |
14 |
if $found++ |
|
189
|
2900 |
20 |
unless my $rv = &$test() |
|
191
|
8 |
12 |
if $found++ |
|
193
|
4 |
2 |
$found ? : |
|
202
|
8 |
20000 |
if &$f() |
|
218
|
4 |
8 |
if $testval |
|
234
|
4 |
8 |
if $testval |
|
243
|
5 |
1 |
if $c != -1 |
|
250
|
21 |
1 |
if defined $_ |
|
251
|
7 |
0 |
if $c != -1 |
|
259
|
6 |
2 |
wantarray ? : |
|
328
|
1 |
11 |
$#List::SomeUtils::PP::A > $#List::SomeUtils::PP::B ? : |
|
355
|
2 |
20 |
unless (ref $_ eq 'ARRAY') |
|
360
|
12 |
8 |
if @$_ > $max |
|
365
|
10 |
90 |
if (@_) |
|
368
|
0 |
10 |
unless ($method eq 'index') |
|
375
|
0 |
10 |
if $index == 0 or $index > $max |
|
380
|
12 |
78 |
if $index >= $max |
|
412
|
4682 |
1 |
defined $_ ? : |
|
420
|
25532 |
3 |
defined $_ ? : |
|
421
|
42300 |
5 |
defined $_ ? : |
|
426
|
0 |
31 |
unless @_ |
|
431
|
28 |
10019 |
if ($_[$i - 1] <= $_[$i]) { } |
|
433
|
1 |
27 |
if $min > $_[$i - 1] |
|
434
|
8 |
20 |
if $max < $_[$i] |
|
438
|
10016 |
3 |
if $min > $_[$i] |
|
439
|
6 |
10013 |
if $max < $_[$i - 1] |
|
443
|
25 |
6 |
if (@_ & 1) |
|
446
|
22 |
3 |
if ($_[$i - 1] <= $_[$i]) { } |
|
448
|
0 |
22 |
if $min > $_[$i - 1] |
|
449
|
1 |
21 |
if $max < $_[$i] |
|
453
|
3 |
0 |
if $min > $_[$i] |
|
454
|
0 |
3 |
if $max < $_[$i - 1] |
|
480
|
11 |
18229 |
if $k >= @_ |
|
485
|
1000 |
1004 |
wantarray ? : |
|
|
2004 |
16222 |
if $rc == 0 |
|
488
|
8210 |
8012 |
if ($rc < 0) { } |
|
512
|
11 |
9243 |
if $k >= @_ |
|
517
|
1004 |
8236 |
if $rc == 0 |
|
519
|
4169 |
4067 |
if ($rc < 0) { } |