Here's a version which shouldn't rely on 5.8:

      01  2345678901234567
perl -ne '${_.$_}++||print'
[download]

-sauoq
"My two cents aren't worth a dime.";