blib/lib/Class/Closure.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 12 | 18 | 66.6 |
line | true | false | branch |
---|---|---|---|
50 | 0 | 0 | if $base->isa($class) |
51 | 0 | 0 | if $_->isa($class) |
58 | 4 | 0 | unless ref $var |
75 | 5 | 13 | if $code |
79 | 3 | 3 | unless $code = $pkg->can($method) |
93 | 3 | 2 | if (my $code = $_[0]->can($AUTOLOAD)) { } |
1 | 1 | elsif (my $fallback = $_[0]->can('FALLBACK')) { } | |
110 | 2 | 4 | if $self->can("BUILD") |
159 | 0 | 4 | unless $arg{'get'} and $arg{'set'} |