| line |
true |
false |
branch |
|
7
|
242 |
1970 |
length $ref && $ref =~ /^([-\+][1-9])?\d*$/u ? : |
|
|
2212 |
954 |
unless ref $ref |
|
8
|
33 |
921 |
if ref $ref eq "ARRAY" |
|
9
|
919 |
2 |
if ref $ref eq "HASH" |
|
15
|
2335 |
737 |
if ($string =~ s/^(0+|[1-9]\d*)://u) { } |
|
|
200 |
537 |
elsif ($string =~ s/^i([-\+]?\d+)e//u) { } |
|
|
46 |
491 |
elsif ($string =~ s/^l(.*)//su) { } |
|
|
480 |
11 |
elsif ($string =~ s/^d(.*)//su) { } |
|
17
|
23 |
2312 |
if $size =~ /^0+$/u |
|
19
|
1 |
2334 |
if length $return < $size |
|
20
|
2329 |
5 |
$k ? : |
|
24
|
2 |
198 |
if $int =~ /^-0/u or $int =~ /^0\d+/u |
|
25
|
194 |
6 |
$k ? : |
|
33
|
42 |
3 |
$k ? : |
|
41
|
1378 |
0 |
if $leftover |
|
42
|
3 |
897 |
if defined $pkey and defined $key and $pkey gt $key |
|
43
|
1372 |
0 |
if defined $key |
|
44
|
1372 |
0 |
if defined $key |
|
46
|
289 |
185 |
$k ? : |