@C = grep{!exists $seen{$_}} @B;
@merged = (@A, @C);