| blib/lib/Hash/Subset.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 24 | 26 | 92.3 |
| line | true | false | branch |
|---|---|---|---|
| 25 | 4 | 8 | if ($ref eq 'ARRAY') { } |
| 4 | 4 | elsif ($ref eq 'HASH') { } | |
| 4 | 0 | elsif ($ref eq 'CODE') { } | |
| 26 | 2 | 2 | if ($reverse) { } |
| 29 | 2 | 4 | unless grep {$key eq $_;} @$keys_src |
| 33 | 4 | 0 | if exists $hash->{$_} |
| 37 | 2 | 2 | if ($reverse) { } |
| 39 | 2 | 4 | unless exists $keys_src->{$_} |
| 43 | 4 | 2 | if exists $hash->{$_} |
| 47 | 2 | 2 | if ($reverse) { } |
| 49 | 2 | 4 | unless &$keys_src($_, $hash->{$_}) |
| 53 | 4 | 2 | if &$keys_src($_, $hash->{$_}) |
| 60 | 6 | 6 | if ($return_ref) { } |