use List::Util qw(first);

my $got_big = first { $_ > 10 } (34,52,67,3,66);