$q = new CGI; if(defined($q->param("confirm"))) { if($q->param("confirm") eq "yes"){ #execute code for yes } else { #execute code for no } } else { print $q->header(), "\n", "
\n", "\n", "\n", ""; } ####
##
##
...
else {
print $q->header(),
"\n",
"\n",
"\n",
"\n",
"";
}
...