___________________________________________________ thanx in advance#!/usr/bin/perl $where = $ENV{'QUERY_STRING'}; if ($where eq 'Front') { print "Content-type: text/html\n\n"; print <<Mn; <HTML> <head> <title>Lezar.org</title> </head> <body bgcolor="#FFFFFF" text="#000000" link="#666666" vlink="#666666" +alink="#666666" style="overflow: hidden"> <table width="100%" height="100%"> <tr height="100%"> <td width="100%"> <div align="center"> <pre>Lezar.org<br><br>Coming soon</pre> <font size="1" face="Verdana, Arial, Helvetica, sans-serif">for inform +ation contact <a href="mailto:info\@lezar.org">info\@lezar.org</a></font></d +iv> </table> </body></HTML> Mn } elsif ($where eq 'WebMail') { print "Content-type: text/html\n\n"; print <<WbMl; <HTML> <head> <title>Lezar.org</title> </head> <body> <script language="JavaScript"> <!-- self.location = "http://lezar.virtualave.net/WebMail"; //--> </script> </body> </html> WbMl } #
In reply to Stuck by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |