perl -e "$x = <STDIN>; print $x"