> perl -MO=Deparse -e "sub foo($); sort foo(42);" sort foo 42