#! /usr/bin/perl

# simple_script - produce trivial HTML output

use CGI;

my ($cgi) = new CGI;

# MAIN-BODY
print $cgi->header ();
print $cgi->start_html (-title => "My Page Title");
print $cgi->h1 ("My Page Heading");
print $cgi->p ();
print "Paragraph 1.\n";
print $cgi->p ();
print "Paragraph 2.\n";
print $cgi->end_html ();
# MAIN-BODY