my $x_set = Set::Scalar->new(@x);
my $y_set = Set::Scalar->new(@y);
push @z, $x_set->intersection($y_set)->empty ? 'n' : 'y';