my @foo = grep /foo/ @results;