blib/lib/Object/Declare.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 9 | 20 | 45.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
11 | 0 | 1 | 0 | @_ && ref $_[0] |
116 | 14 | 0 | 0 | ref $key and ref $key eq 'Object::Declare::Katamari' |
118 | 0 | 14 | 0 | $aliases and exists $aliases->{$key} |
133 | 0 | 10 | 2 | $aliases and exists $aliases->{$key} |
line | l | !l | condition |
---|---|---|---|
15 | 1 | 0 | $args{'aliases'} || {} |
16 | 0 | 1 | $args{'declarator'} || ['declare'] |
17 | 1 | 0 | $args{'copula'} || ['is', 'are'] |
102 | 0 | 12 | $subs_replaced{$sym} ||= *$sym{'CODE'} |