作者LiloHuang (相见不如怀念)
看板perl
标题Re: [问题] 关於排序
时间Fri Jul 20 11:57:19 2007
我只能说你的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
1F：推 handsomegirl:恩~~~谢谢L大的指导 07/20 11:59
2F：→ handsomegirl:所以如果我处理好资料不要用空白隔开,就会比较方便 07/20 11:59
3F：→ handsomegirl:可以解释\s(\w{10})\s\d{4}的意义吗?谢谢 07/20 12:00
4F：→ LiloHuang:我要先去Meeting 晚点我回来再跟你讲 07/20 12:02