cgi-bin/test.cgi


1
2
3
4
5
6
7
8
9
10
11
12
13

#!/usr/bin/perl 
 print "Content-type: text/html\n\n";
 print <<HTML;
 <html>
<head>
 <title>A Simple Perl CGI</title>
 </head>
 <body>
 <h1>A Simple Perl CGI</h1>
 <p>Hello World</p>
 </body>
HTML
 exit;