push (@result, @a);
@result = grep { !$seen{$_}++ } @result;