my @distinct_union, %seen; for my $e ( @group1, @group2 ) { push @distinct_union, $e unless $seen{ $e }++; }