I suppose doing it the easy way is out of the question?

use CGI;
my $q = new CGI;
my %hash = $q->Vars();

# this is faster code than map BTW
my %hash;
$hash{$_} = param($_) for param();
[download]

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print