#!/usr/local/bin/perl -wT
use strict;
use CGI qw/:standard/
print header,
      start_html( -title => 'Test program' ),
      h1( 'Hello world' ),
      end_html;