| blib/lib/MOP/Method.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 16 | 81.2 |
| line | true | false | branch |
|---|---|---|---|
| 23 | 2 | 1035 | if (scalar @_ == 1) { } |
| 24 | 2 | 0 | if (ref $_[0]) |
| 25 | 1 | 1 | if (ref $_[0] eq 'CODE') { } |
| 1 | 0 | elsif (ref $_[0] eq 'HASH') { } | |
| 38 | 1 | 1036 | unless $args{'body'} |
| 41 | 1 | 1035 | unless ref $args{'body'} eq 'CODE' |
| 95 | 0 | 25 | if scalar @classnames == 0 |
| 100 | 18 | 7 | if $candidate eq $class |