hash中能不能按value来排序？

adminsinx

sub asc_sort_subject{
       $a <=> $b;           
}
foreach $key (sort asc_sort_subject(keys(%courses))) {
       print $key, $courses{"$key"};
}
这是根据key来排序的。

ynchnluiti

原帖由 adminsinx 于 2009-1-19 16:01 发表
sub asc_sort_subject{
       $a  $b;           
}
foreach $key (sort asc_sort_subject(keys(%courses))) {
       print $key, $courses{"$key"};
}
这是根据key来排序的。

用
values %hash

adminsinx

可是通过values %hash 我怎么知道它的key的值呢？？？

DQP

我这个太笨了。。。。。。
写出这样的东西来 罪过啊
删了吧

[ 本帖最后由 DQP 于 2009-1-19 16:35 编辑 ]

ynchnluiti

原帖由 adminsinx 于 2009-1-19 16:20 发表
可是通过values %hash 我怎么知道它的key的值呢？？？

修改asc_sort_subject, 按照value排序

ynchnluiti

perldoc -q sort
perldoc -q 'How do I sort a hash'

ynchnluiti

原帖由 DQP 于 2009-1-19 16:25 发表
我这个太笨了。。。。。。
写出这样的东西来 罪过啊
删了吧

还好吧。没像我把问题想简单了

sosogh

google it:
perl  sort  hash  by value

MMMIX

原帖由 sosogh 于 2009-1-20 00:18 发表
google it:
perl  sort  hash  by value

完全没必要。

BTW，回帖之前也看下别人的回复嘛。

riverlee2008

我也写个简单的，
假设代码如下：

use strict; my %hash=('a'=>2,'b'=>3,'c'=>1); foreach my $key (sort {$hash{$b} <=> $hash{$a}} keys %hash){     print $key,"=>",$hash{$key},"\n"; }

如果比较的value值是字符串，可以将<=>改成cmd，调换$a,$b的前后次序分别表示按升序和将序，该例中是根据value的数值大学按将序排列