perl -MData::Dumper -e'$Foo::somevar = undef; print Dumper \%Foo::'