| blib/lib/Sub/Methodical.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 16 | 81.2 |
| line | true | false | branch |
|---|---|---|---|
| 49 | 64 | 4 | if not /^MODIFY_.+_ATTRIBUTES$/ and $_ ne 'AUTOLOAD' and not /^_/ |
| 52 | 56 | 2 | unless B::svref_2object($sub)->STASH->NAME eq $pkg |
| 60 | 1 | 0 | if (ref $ref eq 'CODE' and grep {$_ eq 'Methodical';} @attrs) |
| 72 | 2 | 2 | if $pkg->isa($_) |
| 74 | 1 | 1 | if ($wrap_pkg) |
| 94 | 7 | 5 | if (eval { do { $_[0]->isa($pkg) } }) |
| 100 | 0 | 5 | unless ($self) |
| 103 | 0 | 5 | unless (eval { do { $$self->isa($pkg) } }) |