| lib/Data/Filter.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 18 | 72.2 |
| line | true | false | branch |
|---|---|---|---|
| 62 | 0 | 26 | unless (UNIVERSAL::isa($data, 'HASH')) |
| 87 | 0 | 1 | unless UNIVERSAL::isa($array, 'ARRAY') |
| 111 | 34 | 12 | if (defined $Data::Filter::Filters{$op}) { } |
| 119 | 82 | 71 | unless &$sub($data{$_}, \@filters) |
| 125 | 2 | 10 | if ($op == 1) { } |
| 4 | 6 | elsif ($op == 3) { } | |
| 6 | 0 | elsif ($op == 2) { } | |
| 174 | 0 | 0 | unless defined $$source{$_} |
| 185 | 5 | 1 | unless defined $$dest{$_} |