Select Code to Download

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

use List::MoreUtils qw(any);
my $found_any = any { ... } @whatever;

use List::Util qw(first);
my $found_any = defined first { ... } @whatever;