#!perl -wT use strict; use CGI; # Basic CGI.pm form usage. my $query = new CGI; print $query->header; print $query->start_html("CGI.pm Basic form."); print $query->start_form; print "To:"; print $query->textfield('to'); print "From:"; print $query->textfield('from'); print "Message:"; print $query->textfield('body'); print "
",$query->reset; print $query->submit('Action','Stumbit'); print $query->endform; print "