@union = sort grep { not $seen{$_}++ } (@union, @array3);