在Perl中，我想按值排序哈希的键，数值：
- {
- five => 5
- ten => 10
- one => 1
- four => 4
- }
生成两个数组：
- (1,4,5,10) and (one,four,five,ten)
然后我想对值数组进行规范化，使数字是顺序的：
- (1,2,3,4)
我该如何做？
解决方法
首先按键关联值排序。然后获取值(例如通过使用散列片)。
- my @keys = sort { $h{$a} <=> $h{$b} } keys(%h);
- my @vals = @h{@keys};
或者如果你有一个散列引用。
- my @keys = sort { $h->{$a} <=> $h->{$b} } keys(%$h);
- my @vals = @{$h}{@keys};