# pseudo for ( list ) { # some code presumably using variable } # real for my $key ( keys %hash ) { print "$key\n"; } #### #psuedo $hash{} = ; #read $hash{foo} = 'bar'; #### #pseudo @hash{} = ; #real @hash{ @keys } = @values;