perl -e 'system q{/bin/pwd}'