"uniq"
you don't need an extra hash.
my @uniq = keys %{{ map { $_ => 1 } @list }};
Never been to DZone Snippets before?
Snippets is a public source code repository. Easily build up your personal collection of code snippets, categorize them with tags / keywords, and share them with the world
