| blib/lib/Exporter/Lite.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 20 | 55.0 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 4 | 8 | if (not @imports) { } |
| 27 | 8 | 0 | if ($eokglob = do { $exporter . '::' }->{'EXPORT_OK'} and *$eokglob{'ARRAY'}) |
| 28 | 8 | 0 | if (@{$exporter . '::EXPORT_OK';}) { } |
| 34 | 1 | 7 | if $denied |
| 56 | 17 | 4 | unless $sym =~ s/^(\W)// |
| 68 | 0 | 0 | $type eq '*' ? : |
| 0 | 0 | $type eq '%' ? : | |
| 0 | 0 | $type eq '@' ? : | |
| 3 | 0 | $type eq '$' ? : | |
| 1 | 3 | $type eq '&' ? : |