perl -e'print $ENV{PWD};'