Programming Tips - perl: remove/delete duplicate elements from an array?

Date: 2011may3 Language: perl Q. perl: remove/delete duplicate elements from an array? A. Use grep and a hash like this:
sub removeDuplicates(@) { my(@in) = @_; my(%seen); return grep { ! $seen{$_}++ } @in; } sub exampleUse() { @nodups = removeDuplicates(@a); }