将Perl哈希从最大到最小排序

前端之家收集整理的这篇文章主要介绍了将Perl哈希从最大到最小排序前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我在这里找到一个例子: 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";
    }

这段代码我不完全理解,但是当我试验它时,它从最低到最高排序.如何翻转它从最高到最低排序?

@H_403_18@解决方法
交换$a和$b:

foreach my $fruit (sort {$data{$b} <=> $data{$a}} keys %data) {

猜你在找的Perl相关文章