my $opkg = \%pkg::;
local %pkg::;
$_ ne "foo" and *{"pkg::$_"}=$opkg->{$_} for keys %$opkg;