降序
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",$hashT{$key});
}
Attention:只是a和b互换了位置
降序
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",$hashT{$key});
}
Attention:只是a和b互换了位置