use CGI qw(:standard);
use strict;
print header();
print start_html("Test");
print h1("This is a test");
print end_html();