RosettaCodeData/Task/Remove-duplicate-elements/Perl/remove-duplicate-elements-1.pl

use List::MoreUtils qw(uniq);

my @uniq = uniq qw(1 2 3 a b c 2 3 4 b c d);