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