my %_;
map { %_{$_} = undef } @arr1, @arr2;
my @newarr = keys %_;