| line |
true |
false |
branch |
|
34
|
0 |
85 |
ref $ref eq 'ARRAY' ? : |
|
47
|
645 |
252 |
if ref $value eq 'ARRAY' |
|
50
|
34 |
863 |
if ($t eq 'HASH') { } |
|
|
782 |
81 |
elsif (not $t) { } |
|
|
0 |
81 |
elsif ($t ne 'CODE') { } |
|
51
|
34 |
0 |
unless (tied $value) |
|
59
|
0 |
782 |
if not length $value or $value =~ /^\$/ |
|
77
|
207 |
124 |
if (exists $$self[0]{$key} and scalar @{$$self[0]{$key};}) { } |
|
|
32 |
92 |
elsif ($self->EXISTS('_AUTOLOAD')) { } |
|
78
|
22 |
185 |
unless ref $$self[0]{$key}[-1] |
|
86
|
32 |
0 |
unless $sub |
|
87
|
0 |
0 |
unless $self->EXISTS($key) |
|
97
|
0 |
38 |
if ($ding =~ /^\s*sub\s*{.*}\s*$/) |
|
100
|
0 |
0 |
if $@ |
|
105
|
2 |
33 |
$$self[3] ? : |
|
|
32 |
3 |
$1 ? : |
|
109
|
0 |
38 |
if ($ding =~ /\(\s*\)$/s) { } |
|
|
6 |
32 |
elsif ($ding =~ /\(.*\)$/s) { } |
|
115
|
0 |
38 |
if $@ |
|
119
|
506 |
1375508 |
if exists $_[0][0]{$_[1]} |
|
123
|
0 |
1 |
unless exists $$self[0]{$key} |
|
128
|
0 |
1 |
unless (scalar @{$$self[0]{$key};}) |
|
156
|
2 |
6 |
if ($$self[5] > $#{$$self[4];}) { } |
|
|
0 |
6 |
elsif (wantarray) { } |
|
158
|
0 |
2 |
wantarray ? : |
|
170
|
514 |
313 |
unless exists $$self[0]{$key} |
|
171
|
16 |
315 |
unless ref $_ |
|
172
|
1 |
312 |
if $use_tag |
|
180
|
0 |
0 |
unless exists $$self[1]{$key} |
|
187
|
0 |
0 |
unless exists $$self[1]{$key} |
|
194
|
1 |
0 |
unless scalar @keys |
|
198
|
3 |
2 |
unless $$self[1]{$key}[$i] eq $tag |
|
205
|
2 |
3 |
unless (scalar @{$$self[0]{$key};}) |