Select Code to Download

my $rpt_name = $CGI->param('rpt_name');
my $rpt_descr = $CGI->param('rpt_descr');
#etc., etc.

foreach my $name ( $CGI->param() ) {
   my $value = $CGI->param($name);
   print "The value of $name is $value<br>";
   }

$CGI->import_names('R');
#other stuff
...
                                   );
#other stuff
print $tmpl_main2->output();

#!/usr/bin/perl
use CGI ':standard';
print header();
print param('key');

@names = $CGI->param;

$tmpl_main1->param(passCGI   => \@names);