blib/lib/Object/Registrar.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 20 | 0.0 |
line | true | false | branch |
---|---|---|---|
34 | 0 | 0 | if @_ > 1 |
58 | 0 | 0 | unless (defined $instance) |
95 | 0 | 0 | if (exists $$registrar{'registry'}{$name}) { } |
111 | 0 | 0 | if ($self->exists($name)) { } |
115 | 0 | 0 | if $self->Debug |
123 | 0 | 0 | if $self->Debug |
131 | 0 | 0 | if $self->Debug |
138 | 0 | 0 | unless ($self->exists($name)) |
143 | 0 | 0 | unless ($object) |
156 | 0 | 0 | if ($key =~ /^$pattern$/) |