Help for this page
Select Code to Download
Select
or
download this
foreach my $line1 (@lines1) { print APPEND grep $line1 ne $_,@lines2 ; }