perl中按hash值排序

1、按ASCII码(字符串)排序，则代码如下：

foreach my $key ( sort { $hash{$a} cmp $hash{$b} } keys %hash ) {
    my $value = $hash{$key};
    # do something with ($key, $value)
}

2、按数字大小排列，则代码如下：

foreach my $key ( sort { $hash{$a} <=> $hash{$b} } keys %hash ) {
    my $value = $hash{$key};
    # do something with ($key, $value)
}

转载于:https://blog.51cto.com/liuyuan/1975310