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

推噓1(1推 0噓 0→)留言1則,0人參與, 最新作者abliou (Art of Life)時間18年前 (2007/07/20 14:01), 編輯資訊
0
0
0
內容預覽:
照L大的概念重寫一遍...找出往後算回會固定也是不錯的idea.... ####################################################. @data = map { substr $_ ,10 }. sort. map { [split/ /,$_]->[-

推噓2(2推 0噓 0→)留言2則,0人參與, 最新作者LiloHuang (相見不如懷念)時間18年前 (2007/07/20 12:48), 編輯資訊
0
0
0
內容預覽:
重點還是在於 map { /\s(\w{10})\s\d{4}/; $1.$_ } @data;. 這裡面的 /\s(\w{10})\s\d{4}/ 目的就是為了把你要排序的欄位給比對出來. \s表示1個[空白] \w{10} 表示10個[英文數字] \d{4} 表示4個[數字]. 至於 \w{10

推噓1(1推 0噓 3→)留言4則,0人參與, 最新作者LiloHuang (相見不如懷念)時間18年前 (2007/07/20 11:57), 編輯資訊
0
0
0
內容預覽:
我只能說你的CSV檔案轉出來不應該是以空白隔開. EXCEL檔案應該也可以以逗號隔開,你這樣會造成字串處理上的複雜度. 因此我改用Regular Expression 來處理,這邊不考量檔名後面沒資料的狀況. my @data = (. "WIP0509.csv C2 Depo. P63122800
(還有526個字)

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者handsomegirl (薰)時間18年前 (2007/07/20 11:21), 編輯資訊
0
0
0
內容預覽:
應L大要求~我把一部份範例貼上. WIP0509.csv C2 Depo. P63122800A 2006/11/9 18:32:19. WIP0509.csv C2 Depo. E62625700A 2007/1/11 10:38:59. WIP0509.csv Spacer SiN CVD E6
(還有687個字)

推噓3(3推 0噓 0→)留言3則,0人參與, 最新作者LiloHuang (四年前兩年後)時間18年前 (2007/07/20 10:27), 編輯資訊
0
0
0
內容預覽:
我講重點就好. @data = map { substr $_ ,3 }. sort. map { [split " "]->[1].$_ } @data;. 其實寫法等同於. @data = map { [split " "]->[1].$_ } @data;. @data = sort @dat
(還有867個字)