#one.pl #!/usr/bin/perl use strict; use CGI; my $cgi = new CGI; print $cgi->header; print $cgi->start_html('A Simple Example'), $cgi->h1('A Simple Example'), $cgi->start_form(-action=>"test.pl"), "What's your name? ",$cgi->textfield('name'), $cgi->p, $cgi->submit, $cgi->end_form, $cgi->end_html;