[問題] diff檔案內容並把相異處產出檔案
我是想要diff兩個檔案，並把相異處寫成diff.log
其實就是linux的 "diff A.txt B.txt > diff.log"
只是不知道為何我把那行塞進system()裡面，是無效的
他叫我diff:Try `diff --help' for more information
因此只好找perl內建的功能，例如Text:Diff來解決
但我用:
use Text::Diff;
my $diff_result=diff "$A.txt" => "$B.txt";
print OUTFILE "$diff_result";
他也會把檔名印出來讓我覺得困擾....
跪求各位高手有無其他解法? 謝謝....
這幾天被system()弄得好頭痛....
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 111.243.0.197 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Perl/M.1605425915.A.9A9.html
※ 編輯: fabmanufab (111.243.0.197 臺灣), 11/15/2020 16:25:56
後來發現 不要用system()
直接用system "diff A B > diff.log";即可!!!!
※ 編輯: fabmanufab (36.227.140.104 臺灣), 11/16/2020 08:31:58
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
