perl -le "$f='hello world'; $f=reverse $f;chop $f;$f=reverse $f; print $f"