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


in reply to (code) RE: extract uniques and sort (thanks. 1WTDI)
in thread extract uniques and sort

You know, if this is all that your script does, you may want to consider using standard Unix tools sort and uniq: 
$ cat unsorted | sort | uniq >sorted.unique

[download]
It will probably be a bit faster.

In Section Seekers of Perl Wisdom