| blib/lib/Class/Mutator.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 16 | 68.7 |
| line | true | false | branch |
|---|---|---|---|
| 94 | 1 | 1 | if (not scalar @_) { } |
| 1 | 0 | elsif ($_[0] eq '-isasubclass') { } | |
| 100 | 1 | 0 | unless grep {$_ eq $class;} @{"${target_class}::ISA";} |
| 102 | 0 | 0 | if require Exporter |
| 175 | 5 | 1 | if ($curr =~ s/^Class::Mutator:://) { } |
| 198 | 5 | 1 | unless (scalar @{$package_name . '::ISA';}) |
| 223 | 3 | 3 | if ($op eq '+') { } |
| 3 | 0 | elsif ($op eq '-') { } |