Re: [問題] 雜湊取值的問題
※ 引述《cutekid (KID)》之銘言：
: #!/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)
您好
謝謝您的回覆
但是我看不太懂這一串push(@refs,[m#\s+[./\w]+#g]);
我只大概知道是將[m#\s+[./\w]+#g] 丟到@refs中
但是[m#\s+[./\w]+#g]是什麼意思呢
另外因為我是讀檔案
檔案前有
----DATA Start----的字眼
當我比對到----DATA Start----時我才會進去做排序的動作
但是我跑出來的結果是
ALL 1 A 10834 93.74 P1
ALL 1 A 10834 93.74 P1
ALL 5 B 368 3.18 P2
ALL 1 A 10834 93.74 P1
ALL 5 B 368 3.18 P2
ALL 6 A 21 0.18 F3
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 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 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
會有這樣的重複
請問這樣要怎麼辦呢?
謝謝您的回答~
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.132.37.216
討論串 (同標題文章)
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
