in reply to checking an array of numbers for a particular value

print "Found!" if grep {$_ == $val} @arr;