看板 Perl 關於我們 聯絡資訊
現在手邊有兩個檔案 一個是 aaaa bbbb ccccc dddd eeeee 另一個是 aaaa bbbb dddd ffffff 現在我想統計出檔案一裡每一行在檔案二中出現的次數總合... 比如說這一個比對的結果就是3(因為有出現aaaa,bbbb跟dddd) 可是我不管怎麼寫都無法產生這樣的結果.... 程式碼: open(file1,"<./ok1/NNcontact1.txt"); while($line1=<file1>){ open(file2,"<./ok2/NNcontact1.txt"); while($line2=<file2>){ if ($line1=~/$line2/){ $flag++; } } close file2 ; } print $flag ; $flag = 0; ※ 編輯: abliou 來自: 140.124.50.103 (05/05 22:52)
HXZ:我照你寫的的確得到3啊... 05/06 00:08
chhuang:有考慮檔案最後的空白列嗎? 05/06 00:13
imce:我跑也是3,看來空白列要例外處理 05/06 00:14
abliou:用空白好像真的會有問題..但是為什麼會造成這樣的問題?? 05/06 02:34
HXZ:因為空白和空白一樣啊 05/06 22:09