my %seen; @values = grep { not $seen{$_}++ } @values, @new_values;