Help for this page
$ perl -ne '$seen{$_}++; $seen{$_} == 1 and print' old.txt > new.txt
$ perl -ne '$seen{$_}++; $seen{$_} > 1 and print' old.txt > new.txt