我正在查看此处的示例:http://perlmeme.org/tutorials/sort_function.html
它使代码根据每个键的值对哈希进行排序:
# Using <=> instead of cmp because of the numbers
foreach my $fruit (sort {$data{$a} <=> $data{$b}} keys %data) {
print $fruit . ": " . $data{$fruit} . "\n";
}
这段代码我不完全理解,但是当我试验它时,它从最低到最高排序。如何将其翻转以从最高到最低排序?
答案 0 :(得分:14)
只需使用reverse sort
代替sort
。
foreach my $fruit (reverse sort keys %data) { ...
答案 1 :(得分:12)
交换$a
和$b
:
foreach my $fruit (sort {$data{$b} <=> $data{$a}} keys %data) {