I highly recomend use CGI; as it will (among other things) make reading your parameters much easier:

use CGI qw(:standard);
my(%params) =();
foreach my $param (param()){
   $params{$param} = param($param);
}
[download]

Just makes life easier for us all. see CGI.