my $found_any = grep { ... } @whatever;