Select Code to Download

my $param = do {
   local $ENV{'REQUEST_METHOD'} = 'GET';
...
} else {
   $cgi = CGI->new();
}