各位大大好，小弟有个排序的问题， 我有一串hash，内容大概是这样： my %hash_1 = ( 'L3D0' => '3 0', 'L3D7' => '3 7', 'L13D0' => '13 0', 'L13D1' => '13 1', 'L13D7' => '13 7', ); 因为直接对value做排序的话因value是string， 会把13 0的排在3 0的前面， 所以我希望可以先把value切开成array， 然後再对hash里的数字array做两次排序， 目前写到： while(my ($key, $val) = each(%hash_1)) { my @val_split = split(' ' , $val); %hash_1_split = ($key => [$val_split[0], $val_split[1]]); }; 但这样写%hash_1_split只会存在一笔资料， 请问要怎麽样才能把所有的资料都存入hash中， 并对里面的array做排序呢？ ps.目前的想法是写成 %hash_1_reverse = reverse %hash_1; foreach my $key ( sort { $hash_1_reverse{$a} cmp $hash_1_reverse{$b} } keys %hash_1_reverse ) { my $val = $hash_1_reverse{$key}; print "$val $key\n"; } 然後把上面那段改成对value的两个值做两次排序。 --

※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 123.195.36.103 ※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Perl/M.1480754334.A.9AF.html