perl编程 perl中如何将按hash的排序方法？

perl中如何将按hash的排序方法？如果按ASCII码排序，代码如下：foreachmy$key（sort{$hash{$a}CMP$hash{$B}keys%hash）{my$value=$has

perl中如何将按hash的排序方法？

如果按ASCII码排序，代码如下：foreachmy$key（sort{$hash{$a}CMP$hash{$B}keys%hash）{my$value=$hash{$key}#dosomething with（$key，$value）}如果按数字排序，代码如下：foreachmy$key（sort{$hash{$a}<=>$hash{$B}keys%hash）{my$value=$hash{$key}#dosomething with（$key，$value）}如果按数字排序，代码如下：foreachmy$key（sort{$hash{$B}<=>$hash{$a}keys%hash）{my$value=$hash{$key}dosomething with（$key），$value）}按键（sort{$a<=>$B}键%hash）{print“$item==>$hash{$item}”，“/N”}排列每个$项