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