#!/usr/bin/perl -wT
use strict;
use CGI;

my $q = new CGI;
print $q->header,                    
    $q->start_html('hello world'), 
    $q->h1('hello world'),         
    $q->end_html;