line |
true |
false |
branch |
72
|
0 |
3 |
if ((&max_natint() - 2) % 2 != 1) |
|
0 |
0 |
unless overload::StrVal($_[0]) =~ /0x([0-9a-f]+)\)\z/ |
|
3 |
0 |
if ($@ eq '') { } |
|
1 |
12 |
unless defined $meth |
|
2 |
10 |
if ($@ ne '' or ref $newval ne '' and &_refaddr($newval) == &_refaddr($val)) |
|
2 |
47 |
if (not defined $val or ref \$val eq 'GLOB') { } |
|
0 |
47 |
elsif (do {
my $warned;
local $SIG{'__WARN__'} = sub {
$warned = 1;
}
;
BEGIN {${^WARNING_BITS} = "\x54\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x51\x55\x55\x55\x55\x55\x05"}
0 + (my $tval = $val);
$warned
}) { } |
|
49 |
13 |
if ((my $tval = $val) == 0) { } |
|
4 |
156 |
$b != $b ? : |
|
160 |
5705 |
if ($a != $a) { } |
|
156 |
5549 |
elsif ($b != $b) { } |
|
1213 |
4336 |
elsif ($a == 0 and $b == 0) { } |
|
290 |
250 |
if $val >= -9007199254740992 and $val <= 9007199254740992 |
|
38 |
212 |
if $val < &min_natint() or $val > 1.8446744073709552e+19 |
|
3 |
8 |
if $val & 1 |
|
11 |
201 |
if ($val > 18446744073709549568) { } |
|
87 |
898 |
if $val & 1 |
|
42 |
706 |
if ($val == 0) { } |
|
166 |
540 |
elsif (int $val != $val or &float_is_infinite($val)) { } |
|
42 |
706 |
if ($val == 0) { } |
|
162 |
544 |
elsif (int $val != $val) { } |
|
4188 |
148 |
unless defined $cmp and $cmp == 0 |
|
69 |
79 |
if $a < 0 |
|
1420 |
208 |
unless $a >= $t and $b >= $t |
|
0 |
208 |
unless $cmp == 0 |