in reply to removing duplicates entries from an array

... and there is also the ever popular :
%seen = (); @unique = sort(grep { ! $seen{$_} ++ } @list);