blib/lib/MOP/Method.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 16 | 81.2 |
line | true | false | branch |
---|---|---|---|
25 | 2 | 1029 | if (scalar @_ == 1) { } |
26 | 2 | 0 | if (ref $_[0]) |
27 | 1 | 1 | if (ref $_[0] eq 'CODE') { } |
1 | 0 | elsif (ref $_[0] eq 'HASH') { } | |
40 | 1 | 1030 | unless $args{'body'} |
43 | 1 | 1029 | unless ref $args{'body'} eq 'CODE' |
97 | 0 | 25 | if scalar @classnames == 0 |
102 | 18 | 7 | if $candidate eq $class |