perl -plE"@h{/./g}++;$_=keys%h"

##</code><code>##

perl -lpE'$_=s/(.)(?!.*\1)//g'