my @union = keys %{{(@array1,@array2)x2}};

##</code><code>##

my @array1=qw(a b);
my @array2=qw(c d);
my @union = keys %{{(@array1,@array2)x2}};
print "$_\n" for @union;

#prints:
a
c