use List::MoreUtils 'uniq'; my @new = uniq ( @old );