Select Code to Download

> Perl -MO=Deparse -w
use strict;
sub DEBUG() { 0 }
...
print $My::Package::hash{'key'}, $/;
print 8.141592, $/;
- syntax OK

sub DEBUG {
    0;
}
...
print SymRef()->{'key'}, $/;
print PI() + 5, $/;
- syntax OK

Can't use string ("My::Package::hash") as a HASH ref
while "strict refs" in use