What does it mean to send them "unescaped"? You'll have to delimit the values somehow, or else you might as well just send

join "", map param($_), param;
[download]

as all rammed together. {grin}

One clean choice would be to send them using Data::Denter:

use Data::Denter;
use CGI qw(param);
my %params;
for (param) {
  my @values = param($_);
  $params{$_} = @values == 1 ? $values[0] : \@values;
}
print Denter \%params;
[download]

The output is both human and machine readable.

-- Randal L. Schwartz, Perl hacker