Select Code to Download

use strict;
use warnings;
...
my $temp;
map { $temp=$_ if $_ > 10 } @array;
print "Yes,at least one number is bigger than 10\n" if($temp);

use strict;
use warnings;

my @array=(34,52,67,3,66);
map { print "Yes,at least one number is bigger than 10\n" and exit if 
+$_ > 10 } @array;