0:51 >perl -E "package Foo; $x = 42; $y = 'fred'; sub command { print 'Special command'; } say for sort keys %Foo::;"
command
x
y

 0:54 >