#!/gicl/projs/bin/perl -w

require 5.003;

use strict;
use CGI qw(:standard);

my $query = new CGI;

print $query->header(
	-type=>'text/html'
	);
print $query->start_html( "Title" );
print "This is a test";
print $query->end_html;