perl - Alphabetizing a list of hash keys in perl?

Question

I want to make an array that stores an alphabetized list of hash keys. I tried this method:

@sorted = sort { $hash{$a} cmp $hash{$b} } keys %hash; 

...But it turns out this returns a list of hash keys sorted by value (whereas I want a list of hash keys sorted alphabetically).

Any suggestions?

Answer 1

my @sorted = sort { $a cmp $b } keys %hash;

要不就

my @sorted = sort keys %hash;

Answer 2

哈希键只是字符串：

@sorted = sort keys %hash;

Answer 3

foreach my $key ( sort {$a cmp $b} keys %hash) {

# do something ..

}