| blib/lib/Grep/Query/FieldAccessor.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 20 | 60.0 |
| line | true | false | branch |
|---|---|---|---|
| 24 | 19 | 42 | if (defined $optionalAccessors) |
| 26 | 0 | 19 | unless ref $optionalAccessors eq 'HASH' |
| 54 | 0 | 249 | if ref $field |
| 55 | 0 | 249 | unless ref $accessor eq 'CODE' |
| 56 | 0 | 249 | if exists $self->{'_fields'}{$field} |
| 76 | 0 | 14363 | unless $accessor |
| 91 | 2366 | 2366 | unless @_ |
| 100 | 0 | 2366 | if ($point =~ /^\[(\d+)\]$/) { } |
| 112 | 0 | 2366 | unless $exptype eq $objtype |
| 116 | 0 | 2366 | defined $arridx ? : |