Select Code to Download

use CGI;
my $query = new CGI;
...
foreach my $name (@names) {
  print "$name => ".$query->param($name)."\n";
}