grep &$code, @list