perl -e 'for($i++;$i<11;print"Hi $i\n"and$i++){}'

##</code><code>##

perl -e 'for(;$i<10;$i++,print"Hi $i\n"){}'