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

##</code><code>##

$ perl -ne '$seen{$_}++; $seen{$_} > 1 and print' old.txt > new.txt