:~# perl -e 'system(q{echo $0})'
:~# sh