作者LiloHuang (四年前兩年後)
看板perl
標題Re: [問題] 關於排序
時間Thu Jul 19 22:00:52 2007
my @data = (
"A NO1 2006/10/10 18:36",
"B NO2 2007/12/12 16:37",
"C NO3 2007/12/13 17:40",
"D NO1 2005/01/01 00:01",
"G NO2 2007/12/13 17:20"
);
@data = map { substr $_ ,3 }
sort
map { [split " "]->[1].$_ } @data;
print $_,$/ foreach(@data);
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.114.71.160
1F：推 abliou:真是變態的方法.....XD 07/19 22:40
※ 編輯: LiloHuang 來自: 140.114.71.35 (07/20 10:35)