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

看板Perl作者 (Yes We Can !)時間16年前 (2009/06/10 10:24), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串2/2 (看更多)
※ 引述《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

06/11 10:43, , 1F
不直接用 $ diff file1 file2 ?
06/11 10:43, 1F
文章代碼(AID): #1ABnbDx3 (Perl)
文章代碼(AID): #1ABnbDx3 (Perl)