#NOT OK print "OK\n" if ($test =~ /[753]/);