| line |
true |
false |
branch |
|
56
|
3 |
7 |
if 1 < @_ |
|
57
|
4 |
4 |
wantarray ? : |
|
|
8 |
2 |
if @_ or not @lastError |
|
66
|
0 |
24 |
unless @_ |
|
68
|
0 |
24 |
unless $ref |
|
71
|
14 |
65 |
if (not defined $key) { } |
|
|
4 |
61 |
elsif (eval {
do {
my $x = $$key[0];
1
}
} and isa($ref, 'CODE')) { } |
|
|
22 |
39 |
elsif ($key =~ /^-?\d+$/ and eval {
do {
my $x = $$ref[0];
1
}
}) { } |
|
|
34 |
5 |
elsif (eval {
do {
exists $$ref{$key}
}
}) { } |
|
|
2 |
3 |
elsif (eval {
do {
my $x = $$ref{$key};
1
}
}) { } |
|
73
|
2 |
12 |
unless eval {
do {
my $x = $$ref;
1
}
} |
|
78
|
2 |
2 |
if (@_ and not defined $_[0]) { } |
|
86
|
2 |
20 |
if $key < -@$ref or $#$ref < $key |
|
91
|
0 |
34 |
if (eval {
do {
my $x = $$key;
1
}
}) { } |
|
114
|
1 |
16 |
unless @_ |
|
116
|
2 |
14 |
unless $$sv |
|
119
|
7 |
32 |
if (not defined $key) { } |
|
|
0 |
32 |
elsif (eval {
do {
my $x = $$key[0];
1
}
} and isa($$sv, 'CODE')) { } |
|
|
10 |
22 |
elsif (eval {
do {
my $x = $$key;
1
}
} and !defined($$sv) || eval {
do {
my $x = $$$sv{'0'};
1
}
}) { } |
|
|
5 |
17 |
elsif ($key =~ /^-?\d+$/ and !defined($$sv) || eval {
do {
my $x = $$$sv[0];
1
}
}) { } |
|
124
|
0 |
0 |
if (@_ and not defined $_[0]) { } |