for ($i=1 ;$i<=$number ; $i++) {
  ...
}

##</code><code>##

foreach $i (1..$count) {
  ...
}

##</code><code>##

foreach my $i (1..$count) {
  ...
}