作者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
推 CHC:原來sort 裡面可以用|| 真是感激不盡 ^^ 05/27 00:47
→ LiloHuang::) you can also call a subroutine to do complex work 05/27 00:49