#!/usr/bin/perl -w use strict; use CGI; use CGI::Carp qw(fatalsToBrowser); my $page = new CGI; print $page->header(); print $page->start_html(); print $page->startform(-method=>'POST'); print $page->textfield(-name=>'field1', override=>1); print $page->submit(-name=>'submit', -value=>'Submit'); print $page->endform(); print $page->end_html;