print "found\n" if grep(/^$number\$/, @array);