in reply to perl process slower and slower when loop number increase
Note that for(my $i=0;$i<=100000000;$i++) is a needless complex version of for my $i (0..100000000).