|
<html > <head> <title>PERL SCRIPT TEST</title> </head> <body> <form> METHOD="GET" ACTION="http://www.domain.com/Scripts/test.pl?"> <input type=submit value="Run PERL Script"> </form> </body> </html> |
|
print <<"END"; HTTP/1.0 200 OK Content-Type: text/html END print "<html>"; print "<head>"; print "<title>Test PERL Script</title>"; print "</head>"; print "<body>"; print "<h1>Hello World</h1>"; print "</body>"; print "</html>"; exit; |