| line |
true |
false |
branch |
|
90
|
0 |
0 |
unless ref $hash and ref $hash eq 'HASH' |
|
92
|
0 |
0 |
unless ref $allowed_keys and ref $allowed_keys eq 'ARRAY' |
|
96
|
0 |
0 |
if (defined wantarray) { } |
|
104
|
0 |
0 |
if (wantarray) { } |
|
114
|
0 |
0 |
unless grep {$k eq $_;} @{$allowed_keys;} |
|
149
|
0 |
0 |
unless ref $hash and ref $hash eq 'HASH' |
|
151
|
0 |
0 |
unless ref $allowed_keys and ref $allowed_keys eq 'ARRAY' |
|
155
|
0 |
0 |
if (defined wantarray) { } |
|
163
|
0 |
0 |
if (wantarray) { } |
|
173
|
0 |
0 |
if (not grep({$k eq $_;} @{$allowed_keys;})) { } |
|
178
|
0 |
0 |
if (ref $hash->{$k} and ref $hash->{$k} eq 'HASH') |