#! C:/Perl -w # too late to run Taint on Win32. See node link at bottom use strict; use CGI qw/:standard/; #for form based applications, you'll need most of the functions #and it's a bit less typing over the function oriented way. #See CGI.pm docs for more on that. if (param('submit')){ print header, start_html('Thanks for your request'), h2("Submission accepted"), h4("Thank you"), end_html; } else { # do whatever needs doing # most likely you'll be building your form }