Select Code to Download

% perl -ne 'push @a, $_; $h{$_}++; END { print for grep $h{$_}==1, @a 
+}' foo.txt

% perl -ne '$h{$_}++; END { print for grep $h{$_}==1, keys %h }' foo.t
+xt