#!/usr/bin/perl -wT
# @(#)html.cgi 1.4 10 Oct 1995 03:31:37
#
# html.cgi - an example of an CGI returning HTML
#
# @(#) $Revision: 1.16 $
# @(#) $Id: html.cgi,v 1.16 2006/06/30 08:40:14 root Exp $
#
# NOTE: This does things the hard way, but it works.
# See the Perl CGI examples for a better method.
# setup
#
use strict;
select(STDOUT);
$| = 1;
# we must first send our MIME type
#
print "Content-type: text/html\n";
# we must next send a URL for another document, or an empty line
#
print "\n";
# return the HTML document
#
print <
HTML returned by html.cgi
HTML returned by html.cgi
This html document was produced by html.cgi.
View the html.cgi source.
Return to the CGI
stuff page.
Author:
chongo
<Landon Curt Noll>
/\\oo/\\