#! /opt/local/bin/perl

use CGI qw(:standard);
import CGI font;

# change the following line (and add similar lines if necessary)
# to reflect what you put in your form and what you want to use it 
# for in this program

$some_variable=&param('some_form_input_name');

# in the example line above, $some_variable is the name given to the form 
# input 'some_form_input_name' change it to something more relevant

# use the data you have collected from the form in the generation of
# the HTML that follows

print "Content-type: text/html\n\n";

print "<HTML>";

print "<head> <TITLE> Title of Sample Page</TITLE> </head>\n";

print "<body bgcolor=lightblue text=#000000 link=#006633\n";
print "      alink=#996600 vlink=#663300\n>";

print "</HTML>";
