http://qs1969.pair.com?node_id=149069


in reply to Save 2 files' diff as 3rd file

I like the sledgehammer method:
#!/perl $logA = "/path/to/logfile1"; $logB = "/path/to/logfile2"; $outFile = "/path/to/resultant/File"; open (DIFF, "diff $logA $logB|"; open (OUT, ">$outFile"); select (OUT); while (<DIFF>){print;} close (OUT); close (DIFF);