| blib/lib/Hash/Match.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 30 | 32 | 93.7 |
| line | true | false | branch |
|---|---|---|---|
| 23 | 34 | 0 | if (my $rules = $args{'rules'}) { } |
| 25 | 22 | 12 | XXX ? : |
| 39 | 19 | 37 | if (XXX) { } |
| 41 | 16 | 3 | if XXX |
| 43 | 2 | 1 | if XXX |
| 49 | 35 | 2 | if defined $value |
| 71 | 3 | 57 | if ($key eq "-not") |
| 72 | 2 | 1 | $is_hash ? : |
| 75 | 1 | 59 | unless $KEY2FN->{$key} |
| 81 | 8 | 105 | if (XXX) { } |
| 83 | 6 | 2 | if (XXX) { } |
| 2 | 0 | elsif (XXX) { } | |
| 115 | 56 | 49 | if (not XXX and XXX || XXX) { } |
| 48 | 1 | elsif (XXX or XXX or not XXX) { } | |
| 119 | 22 | 34 | XXX ? : |
| 139 | 101 | 63 | exists $hash->{$key} ? : |