Change access granted to be:
sub accessgranted
{
   print>>End
   <META HTTP-EQUIV="refresh" CONTENT="5;
URL=http://www.page.com/entrypage.html";>
End
   print header;
   print>>Body
   <TITLE>Thank You</TITLE>
   <FONT FACE = Arial SIZE = 2 COLOR = BLUE>
   <STRONG>Permission has been granted $username.
   <BR> Enjoy the site.</STRONG></FONT>
   If the page doesn't take you there in 5 seconds, please <a
href="http://www.page.com/entrypage.html";>click here</A><BR>
Body
}


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to