my %seen; my @all = grep !$seen{$_}++, @group1, @group2;