| blib/lib/Devel/GlobalSub.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 12 | 91.6 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 2 | 0 | unless ($name =~ /::/) |
| 31 | 460 | 14992 | unless (defined &{"${package}::$sub_name";}) |
| 39 | 220 | 44 | @_ ? : |
| 46 | 9028 | 44 | if (defined $val and defined *ENTRY{'HASH'} and $key =~ /::$/ and $key ne 'main::' and $key ne ' |
| 53 | 6443 | 2585 | $pack ne 'main' ? : |
| 60 | 220 | 44 | if @todo |