print CGI::header;
print "Location: $ok_url";

##</code><code>##

print "Location: $ok_url";