# perl -MO=Deparse -e'for($i=0;$i<=10;$i++){print $i}'
for ($i = 0; $i <= 10; ++$i) {
    print $i;
}
-e syntax OK