note BrowserUk <blockquote><i></i></blockquote> <p>This saves 2 strokes over yours: <code> perl -plE"@h{/./g}++;$_=keys%h" </code> <p>And this saves 2 more over your version of [tye]'s: <code> perl -lpE'$_=s/(.)(?!.*\1)//g' </code> <div class="pmsig"><div class="pmsig-171588"> <hr /> <font size=1 > <div>With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'</div> <div>Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.</div> <div>"Science is about questioning the status quo. Questioning authority". </div> <div>In the absence of evidence, opinion is indistinguishable from prejudice. </div> </font> </div></div> 1012437 1012630