in reply to Golf for unique digits
Hmm, this doesn't beat tye's, but matches it, with a different technique. I wish I could find a way to shave a stroke using this method, but I think I've reached the dead end.
perl -lnE'@h{/./g}--;say~~keys%h'
And this adaptation of tye's shaves a stroke:
perl -lnE'say~~s/(.)(?!.*\1)//g'
Dave
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: Golf for unique digits
by BrowserUk (Patriarch) on Jan 10, 2013 at 09:58 UTC | |
by eyepopslikeamosquito (Archbishop) on Jan 10, 2013 at 10:15 UTC |
In Section
Seekers of Perl Wisdom