http://www.perlmonks.org?node_id=1012635


in reply to Re: Golf for unique digits
in thread Golf for unique digits

This saves 2 strokes over yours:

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

And this saves 2 more over your version of tye's:

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

With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.