for (my $i = 1; $i < 10; $i++){
    print "$i\n";        # Ooops - only counted to 9!
}

for my $i (1..10){
   print "$i\n";         # Does the right and obvious thing
}

print "$_\n" for 1..10;  # Same thing, even more Perlish