| blib/lib/Safe/World/ScanPack.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 10 | 60.0 |
| line | true | false | branch |
|---|---|---|---|
| 58 | 0 | 8 | if ($$self{'SCANNEDS'}{$packref}) |
| 66 | 4 | 0 | if (defined $val and defined *ENTRY{'HASH'} and $key =~ /::$/ and $key ne 'main::' and $key ne ' |
| 67 | 4 | 0 | $pack ne 'main' ? : |
| 70 | 3 | 1 | unless ($$self{'PACKAGES'}{$p}) |
| 72 | 3 | 0 | if (not $$self{'SCANNEDS'}{"$packref"}) { } |