in reply to Perl Golf-- testing array intersection

thundergnat relies on @x neither having '0' nor '' elements.

I think I can do better: 33 in scalar context, else 35: