perl -e 'print `perl -S cwd.pl`'