| blib/lib/Object/Trampoline.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 14 | 64.2 |
| line | true | false | branch |
|---|---|---|---|
| 68 | 3 | 7 | unless $proto |
| 113 | 3 | 1 | unless $proto |
| 122 | 0 | 1 | if /\W/u |
| 142 | 1 | 0 | unless eval "$init" |
| 190 | 0 | 7 | unless $_[0] = $_[0]->() |
| 193 | 0 | 7 | unless my $class = &blessed($_[0]) |
| 198 | 7 | 0 | if (my $sub = $class->can($method)) { } |