perl -wle "package foo; sub unknown {}; package main; print for keys %{ 'foo::' }"