| blib/lib/Object/Depot/Role.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 5 | 12 | 41.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 44 | 0 | 0 | 2 | defined $arg and $arg eq $name |
| 102 | 3 | 0 | 0 | @_ == 1 and &blessed($_[0]) |
| 3 | 0 | 0 | @_ == 1 and &blessed($_[0]) and $_[0]->isa('Object::Depot') |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 59 | 1 | 2 | 0 | $sub ||= subname($name, sub { $class->fetch(@_); } ) |