$ perl -E'if (0) { require Foo::Bar } say for keys %Foo::' Bar::