作者LiloHuang (相见不如怀念)
看板Perl
标题Re: [问题] 关於排序
时间Tue May 27 00:21:39 2008
※ 引述《CHC (又过了一年)》之铭言：
: 取出来的顺序会是"A AA AB B BB BC C N"
: 如果用 sort {length($a) <=> length($b)} (keys %hash)
: 则取出来的顺序会照位数排 但是同样位数如"A B C N"
: 会不照顺序
: 想了一些写法 都要用很复杂的方式改写
: 不知道有没有什麽比较简洁的写法可以达到这种排序方式
: 麻烦各位帮帮忙 谢谢
It is very easy, you can do it in the way :)
sort { length($a) <=> length($b) || $a cmp $b } (keys %hash)
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.114.71.40
1F：推 CHC:原来sort 里面可以用|| 真是感激不尽 ^^ 05/27 00:47
2F：→ LiloHuang::) you can also call a subroutine to do complex work 05/27 00:49