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互换了位置

已标记关键词 清除标记
相关推荐
©️2020 CSDN 皮肤主题: 大白 设计师:CSDN官方博客 返回首页