>perl -le"$i=3; print($i, ++$i, $i);"
444