Re: [求教] 如何用perl 比對兩個檔案內容?

[lalelee (Yes We Can !)]

※ 引述《lalelee (Yes We Can !)》之銘言：
: 有兩個文字檔，一個文字檔file1裡面放的是abcde，
: 另一個file2放的是12345ab，
: 請問要怎麼寫才可以比對說file2 裡面沒有cde 然後把cde 列出來？
: 我的想法是開兩個file handle 然後逐一讀出比對
: 但是實作 做不出來  @@

目前自己初步想到的是這樣:

open f1,"<file1.txt";
chomp(@pattern=<f1>);
close f1;
open f2,"<file2.txt";
while ($line=<f2>){
   for (@pattern){
   if ($line ~= /$_/)
   {
      print $line;
   }

  }
}

close f2;
close f1;

但僅能將ab 列出來，但我想要的是將cde 列出
板上的各位不知道有沒有比較好的想法
謝謝





--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 210.69.75.17
推 kornelius:不直接用 $ diff file1 file2 ?