Select Code to Download

$params = $cgi->Vars();

$params = { map { $_ => ($cgi->param($_))[0] } $cgi->param };

%params = map { $_ => ($cgi->param($_))[0] } $cgi->param;