@matching = grep { TEST $_ } @array;