for (my $i=0; $i<$loop; $i++)