看板 [ Perl ]
討論串[問題] 關於排序
共 18 篇文章

推噓1(1推 0噓 1→)留言2則,0人參與, 最新作者LiloHuang (相見不如懷念)時間17年前 (2008/05/27 00:21), 編輯資訊
0
0
0
內容預覽:
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

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者CHC (又過了一年)時間17年前 (2008/05/27 00:13), 編輯資訊
0
0
0
內容預覽:
假設我把一組資料"A B C N AA AB BB BC" 存到一個hash中. 取出來的時候想利用排序得到跟上面一樣的結果. 就是先依照ABC的英文數字排序. 如果有兩位數 位數少的要先. 但是我直接用sort (keys %hash). 取出來的順序會是"A AA AB B BB BC C N"
(還有108個字)

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者gohiei (真是無聊的...)時間18年前 (2007/07/21 23:31), 編輯資訊
0
0
0
內容預覽:
恩,感謝您的回應!!. --. 發信站: 批踢踢實業坊(ptt.cc). ◆ From: 218.169.186.225.

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者LiloHuang (相見不如懷念)時間18年前 (2007/07/21 15:58), 編輯資訊
0
0
0
內容預覽:
對於你的ST史瓦茲轉換 與我使用的GRT我在這邊做一個比較. 使用的是世界公認標準的Perl Benchmark模組來進行測試. Benchmark: timing 100000 iterations of GRT, ST.... GRT: 2 wallclock secs ( 3.18 usr +
(還有47個字)

推噓3(3推 0噓 3→)留言6則,0人參與, 最新作者gohiei (真是無聊的...)時間18年前 (2007/07/21 14:01), 編輯資訊
0
0
0
內容預覽:
貢獻一個,. print. map { $_->[1] }. sort { $a->[0] cmp $b->[0] }. map { [(split /\s+/)[1] , $_ ] } @data;. 基本上和大家的做法差不多了,. 不過我是採用 [ ],這個技巧好像在 Perl Cookbook