Thanks again.. RCP#!perl open FILE1, "<file1"; @linesFile1 = <FILE1>; close FILE1; open FILE2, "<file2"; @linesFile2 = <FILE2>; close FILE2; open(MYOUTFILE, ">file3"); open(MYOUTFILE, ">>file3"); foreach $line(@linesFile1) { if(! grep{$_ eq $line} @linesFile2 ){ print MYOUTFILE "$line"; } } print "\n"; close(MYOUTFILE);
In reply to Re: Re: Re: Re: Removing duplicates
by RCP
in thread Removing duplicates
by RCP
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |