perl -e "$a=2; $b = $a + $a; print $b,'\n'"