Help for this page

Select Code to Download


  1. or download this
    my $cgi = CGI->new;
if ($cgi->param ('foo') {
...
} else {
  # no data, so print an empty form
}
  2. or download this
    if ($ENV{QUERY_STRING} || 'POST' eq $ENV{REQUEST_METHOD}) {
  # have data to process
} else {
  # no data, so print an empty form
}