perl -e "print reverse qx/dir/;"