Select Code to Download

#!/usr/local/bin/perl -w
use strict;
...
print Dumper(\%Foo::);
$x->almost_any_method_besides_import(qw(:blah foo whatever 123));
print Dumper(\%Foo::);

$VAR1 = {};
...
        };
Can't locate object method "almost_any_method_besides_import" via pack
+age "Foo"\
 at test.pl line 9.