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