Re: [問題] 關於排序
我只能說你的CSV檔案轉出來不應該是以空白隔開
EXCEL檔案應該也可以以逗號隔開,你這樣會造成字串處理上的複雜度
因此我改用Regular Expression 來處理,這邊不考量檔名後面沒資料的狀況
my @data = (
"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 E6071151PA 2006/7/9 04:31:31",
"WIP0509.csv Spacer SiN CVD E60711533A 2006/7/9 04:31:31",
"WIP0509.csv IN-Gate-Stack-Depo E7061360CA 2007/3/10 13:59:17",
"WIP0509.csv IN-Gate-Stack-Depo E7061370MA 2007/3/13 04:10:24",
"WIP0510.csv WAT E70221826A 2007/4/27 22:13:11",
"WIP0511.csv DT Photo E70222107A 2007/3/6 21:04:42",
"WIP0511.csv DT Photo E70222100A 2007/3/6 21:04:42"
);
@data = map { substr $_ ,10 }
sort
map { /\s(\w{10})\s\d{4}/; $1.$_ } @data;
print $_,$/ foreach(@data);
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.114.71.35
推
07/20 11:59, , 1F
07/20 11:59, 1F
→
07/20 11:59, , 2F
07/20 11:59, 2F
→
07/20 12:00, , 3F
07/20 12:00, 3F
→
07/20 12:02, , 4F
07/20 12:02, 4F
討論串 (同標題文章)
Perl 近期熱門文章
PTT數位生活區 即時熱門文章