'for(;;)2'  => '$sum=0; for (my $i=0;$i<=$n;) {$sum+=$i++}'