#!/usr/bin/perl -w
#
use strict;
use CGI;
use FreezeThaw qw(freeze thaw);
my $page = CGI->new();
my $ice_cube = freeze $page;
print $page->header();
print $page->start_html();
print $page->startform();
print qq(\n);
print $page->endform();
print $page->end_html();
####
Content-Type: text/html
Untitled Document