in reply to IF and some conditions
print "OK\n" if grep /$test/, (3,5,7); [download]
print "OK\n" if grep { $test == $_ } (3,5,7); [download]