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