| blib/lib/Acme/Pr0n.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 10 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 1 | 3 | unless (exists $INC{$path . '.pm'}) |
| 24 | 1 | 2 | unless (exists $$glob{'VERSION'} and ${*{$$glob{'VERSION'};}{'SCALAR'};} >= 0.18) |
| 50 | 5 | 85 | if exists $skip{shift(@$slots) . $symbol} |
| 53 | 5 | 70 | if $skip_slot |
| 55 | 22 | 48 | if (defined(my $ref = *{$$glob{$symbol};}{$slot})) |