#!/usr/bin/perl
use CGI;

my $q = new CGI;
print $q->header(),
      $q->h1( "Hello World!" ),
      $q->start_form(),
      $q->textbox( -name=>"text" ),
      $q->submit,
      $q->end_form;