Select Code to Download

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

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

{
   my $i;
...
      # some stuff with $i
   }
}

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

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

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