perl -ple'}{package Hello;&world;sub AUTOLOAD{$_=$AUTOLOAD;s;::; ;}' < /dev/null