Select Code to Download

if there are submitted form variables then
  perform the requested action 
else
  display the form
end if

use CGI qw/:standard/;
...
...
} else {
  # display the form
}