blib/lib/ObjectDB/With.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 12 | 0.0 |
line | true | false | branch |
---|---|---|---|
18 | 0 | 0 | if $self->{'with'} and ref $self->{'with'} ne 'ARRAY' |
23 | 0 | 0 | unless $self->{'with'} |
0 | 0 | if (my(@with) = sort(grep({defined $_;} @{[] unless $self->{'with'};}))) | |
29 | 0 | 0 | if (ref $name eq 'HASH') |
43 | 0 | 0 | if ($seen{$seen}) |
51 | 0 | 0 | $parent_as ? : |