my %uniq;
@merged = grep { ++$uniq{$_} == 1 } (@array1, @array2);