blib/lib/Data/Object/Singleton.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 3 | 6 | 50.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
25 | 0 | 0 | 1 | my $orig = $class->can('new') and not $class->can('renew') |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
21 | 2 | 1 | 0 | $hold //= &$orig(@_) |