for my $i (1..10) {
   # some stuff with $i
}

##</code><code>##

my $i;
for $i (1..10) {
   # some stuff with $i
}

##</code><code>##

{
   my $i;
   for $i (1..10) {
      # some stuff with $i
   }
}

##</code><code>##

for (int i=0, i<5; i++) {
   ...
}
// i in still in scope here!

##</code><code>##

foreach my $var ('a', 'b') {
   ...something that may modify $var...
   print($var);
}

##</code><code>##

foreach ('a', 'b') {
   my $var = $_;
   ...something that may modify $var...
   print($var);
}