| blib/lib/Jojo/Base/Compat.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 18 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 33 | 0 | 0 | unless my $flag = shift() |
| 38 | 0 | 0 | if ($flag eq '-base') { } |
| 0 | 0 | elsif ($flag eq '-strict') { } | |
| 0 | 0 | elsif ($flag eq '-role') { } | |
| 0 | 0 | elsif ($base = $flag and $flag = '-base' and not $base->can('new')) { } | |
| 60 | 0 | 0 | if ((shift() || '') eq '-signatures') |
| 66 | 0 | 0 | if ($base) |
| 72 | 0 | 0 | if (@exports) |
| 85 | 0 | 0 | unless my $class = &Scalar::Util::blessed($self) |