blib/lib/Mixin/ExtraFields/Driver/HashGuts.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 7 | 11 | 63.6 |
line | l | !l | condition |
---|---|---|---|
31 | 38 | 4 | $self->storage->{$id} ||= {} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
33 | 37 | 0 | 5 | $$object{$self->hash_key} or 0 == $store |
34 | 0 | 5 | 0 | $$object{$self->hash_key} ||= $store |
45 | 3 | 2 | 0 | $$arg{'hash_key'} || $self->default_hash_key |