use strict; use warnings; my @array=(34,52,67,3,66); 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;