$ time perl -le'for my $i( 0 .. 10_000_000 ){ 1 }'

real    0m1.014s
user    0m0.940s
sys     0m0.004s

$ time perl -le'for(my $i= 0; $i <= 10_000_000;$i++ ){ 1 }'

real    0m1.532s
user    0m1.532s
sys     0m0.000s