# pseudo
for <variable> ( list ) {
   # some code presumably using variable
}

# real
for my $key ( keys %hash ) {
    print "$key\n";
}