| blib/lib/Object/Prototype.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 16 | 62.5 |
| line | true | false | branch |
|---|---|---|---|
| 34 | 29 | 0 | if @_ |
| 46 | 0 | 17 | if $DEBUG |
| 56 | 0 | 54 | if $DEBUG |
| 58 | 28 | 26 | if $code |
| 60 | 0 | 79 | if $DEBUG |
| 62 | 77 | 2 | ref $constructor eq ref $self ? : |
| 65 | 24 | 53 | if $code |
| 67 | 0 | 0 | if not $code |