※ 引述《yalent ( 心只有妳 )》之銘言：
: 有個問題想跟大家請教
: 我有一個檔案裏面有一串資料是這樣
: Data for all :
: No. A/B Count Percent Name
: ---- ---------- --- ------------ ------- -----------------
: ALL 1 A 10834 93.74 P1
: ALL 5 B 368 3.18 P2
: ALL 8 B 218 1.89 N/A
: ALL 7 B 93 0.80 F1
: ALL 10 B 23 0.20 F2
: ALL 6 A 21 0.18 F3
: 但是我想轉換檔案成下面這樣
: Data for all :
: No. A/B Count Percent Name
: ---- ---------- --- ------------ ------- -----------------
: ALL 1 A 10834 93.74 P1
: ALL 5 B 368 3.18 P2
: ALL 6 A 21 0.18 F3
: ALL 7 B 93 0.80 F1
: ALL 8 B 218 1.89 N/A
: ALL 10 B 23 0.20 F2
: 大概有初步的想法是用雜湊取值
: 但是雜湊裡面要將No.做大小排列這部分不曉得怎麼用
: 有大大可以幫忙的嗎?
: 感謝
#!/usr/bin/perl -w
while(<DATA>){
push(@refs,[m#\s+[./\w]+#g]);
}
foreach $ref (sort {$a->[1] <=> $b->[1]} @refs){
print @$ref,$/;
}
__END__
ALL 1 A 10834 93.74 P1
ALL 5 B 368 3.18 P2
ALL 8 B 218 1.89 N/A
ALL 7 B 93 0.80 F1
ALL 10 B 23 0.20 F2
ALL 6 A 21 0.18 F3
※ 編輯: cutekid 來自: 36.225.160.245 (01/18 03:01)