my @out = grep { -1 == index " @find ", $_} @a; #### my @out = grep { -1 == index "@find", $_} @a;