1. 程式人生 > >perl hash 按值排序 升序 降序

perl hash 按值排序 升序 降序

降序

foreach my $key (sort  { $hashT{$b} <=> $hashT{$a} } keys %hashT){
    printf("%s/t%s/n",$key, $hashT{$key});
}

升序

foreach my $key (sort  { $hashT{$a} <=> $hashT{$b} } keys %hashT){
    printf("%s/t%s/n",$key, $hashT{$key});
}

Attention:只是a和b互換了位置