blib/lib/Object/Depot.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 14 | 26 | 53.8 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
73 | 1 | 0 | 3 | @$args == 1 and ref $args->[0] eq 'HASH' |
91 | 16 | 2 | 48 | @$args and not &blessed($args->[0]) |
94 | 49 | 3 | 14 | $self->_has_default_key and not defined $key |
110 | 58 | 0 | 0 | $self->strict_keys and not exists $self->_key_args->{$key} |
128 | 0 | 0 | 1 | defined $arg and $arg eq $name |
753 | 1 | 0 | 0 | $self->strict_keys and not exists $self->_key_args->{$key} |
line | l | !l | condition |
---|---|---|---|
161 | 0 | 0 | $self->_all_objects->{$key} ||= {} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
435 | 3 | 9 | 13 | $object ||= $self->_objects->{$key} |
530 | 0 | 0 | 0 | ref $object || qq["$object"] |