perl -e 'while(<>){ $_{$_} or print $_; $_{$_}=1;}' <file

##</code><code>##

perl -e 'while(<>){ $_{$_}=1;} print sort keys %_;' <file