| line |
true |
false |
branch |
|
41
|
0 |
25 |
if ($pkg eq "List::Util" and @_ < 2) |
|
52
|
7 |
25 |
unless (length ref $f and eval {
do {
$f = \&$f;
1
}
}) |
|
57
|
2 |
23 |
unless @_ > 1 |
|
76
|
0 |
5 |
unless (length ref $f and eval {
do {
$f = \&$f;
1
}
}) |
|
81
|
1 |
4 |
unless @_ |
|
82
|
0 |
4 |
unless @_ > 1 |
|
104
|
5 |
18 |
unless (length ref $f and eval {
do {
$f = \&$f;
1
}
}) |
|
116
|
1 |
21 |
unless @_ |
|
123
|
0 |
16 |
unless @_ |
|
131
|
2 |
19 |
unless @_ |
|
139
|
0 |
4 |
unless @_ |
|
147
|
0 |
4 |
unless @_ |
|
161
|
1 |
15 |
if $num > @_ |
|
162
|
5 |
11 |
defined $RAND ? : |
|
169
|
0 |
4 |
unless (length ref $f and eval {
do {
$f = \&$f;
1
}
}) |
|
181
|
0 |
5 |
unless (length ref $f and eval {
do {
$f = \&$f;
1
}
}) |
|
193
|
0 |
4 |
unless (length ref $f and eval {
do {
$f = \&$f;
1
}
}) |
|
205
|
0 |
4 |
unless (length ref $f and eval {
do {
$f = \&$f;
1
}
}) |
|
228
|
1 |
2 |
if (@_ % 2) |
|
243
|
0 |
1 |
if (@_ % 2) |
|
253
|
0 |
1 |
if (@_ % 2) |
|
265
|
0 |
11 |
unless (length ref $f and eval {
do {
$f = \&$f;
1
}
}) |
|
270
|
1 |
10 |
if (@_ % 2) |
|
290
|
0 |
7 |
unless (length ref $f and eval {
do {
$f = \&$f;
1
}
}) |
|
295
|
2 |
5 |
if (@_ % 2) |
|
307
|
4 |
7 |
wantarray ? : |
|
|
11 |
7 |
&$f() ? : |
|
315
|
0 |
5 |
unless (length ref $f and eval {
do {
$f = \&$f;
1
}
}) |
|
320
|
0 |
5 |
if (@_ % 2) |
|
331
|
1 |
2 |
wantarray ? : |
|
|
3 |
10 |
if &$f() |
|
344
|
108 |
3 |
defined $_ ? : |
|
353
|
3 |
0 |
if (ref $nv and defined &overload::ov_method and defined &overload::mycan) |
|
355
|
0 |
3 |
if (UNIVERSAL::isa($nv, 'Math::BigInt')) { } |
|
|
3 |
0 |
elsif (my $method = overload::ov_method(overload::mycan($package, '(0+'), $package) || overload::ov_method(overload::mycan($package, '""'), $package) || overload::ov_method(overload::mycan($package, 'bool'), $package)) { } |
|
|
0 |
0 |
elsif (my $nomethod = overload::ov_method(overload::mycan($package, '(nomethod'), $package)) { } |
|
371
|
0 |
333453 |
if (ref $nv) |
|
380
|
1184 |
9 |
$NV > 0 ? : |
|
|
192159 |
1193 |
($f = sprintf('%.0f', $NV)) ne sprintf('%.0f', $NV + 1) && $f ne sprintf('%.0f', $NV - 1) ? : |
|
|
17064 |
193352 |
$iv - 1 == $iv ? : |
|
|
93167 |
210416 |
int $NV != $NV ? : |
|
|
82 |
303583 |
$NV != $NV ? : |
|
|
29788 |
303665 |
($NV = (unpack 'F', $F = pack('F', $nv))[0]) == 0 ? : |
|
|
0 |
333453 |
ref $nv ? : |
|
398
|
333451 |
2 |
defined $_ ? : |
|
411
|
4 |
0 |
$_ > 0 ? : |
|
|
14 |
4 |
/\A[0-9]+\z/ ? : |
|
417
|
1 |
11 |
ref $_ ? : |
|
|
16 |
2 |
defined $_ ? : |
|
427
|
31 |
2 |
defined $_ ? : |
|
435
|
3 |
8 |
if $size > @_ |
|
436
|
4 |
4 |
$size >= 0 ? : |
|
442
|
1 |
8 |
if $size > @_ |
|
443
|
4 |
4 |
$size >= 0 ? : |