| blib/lib/Object/Container/Exporter.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 18 | 22 | 81.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 14 | 5 | 1 | 5 | scalar @opts == 1 and ($opts[0] || '') =~ /^-base$/i |
| 4 | 1 | 1 | scalar @opts >= 1 and not +($opts[0] || '') =~ /^-no_export/i | |
| 98 | 0 | 0 | 5 | @init_opt == 1 and ref $init_opt[0] eq 'CODE' |
| line | l | !l | condition |
|---|---|---|---|
| 14 | 6 | 0 | $opts[0] || '' |
| 2 | 0 | $opts[0] || '' | |
| 33 | 2 | 4 | $opts[0] || '' |
| 68 | 1 | 1 | $$self{'_register_namespace'}{$name} || sub { my $target = shift(); my $container_name = join('::', $self->base_name, _camelize($name), _camelize($target)); return $target ? $self->get($container_name) : $self; } |
| 80 | 1 | 4 | $class->instance->{'_default_container_name'} || 'container' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 137 | 9 | 5 | 5 | $$self{'_inflated_classes'}{$class} ||= do { my $initializer = $$self{'_registered_classes'}{$class}; $initializer ? &$initializer($self) : () } |