in reply to Perl Golf-- testing array intersection
I think I can do better: 33 in scalar context, else 35: