my @results = map sub { return () unless m/good stuff/; ... }, @array;