Help for this page
my @vals = $q->param('...'); print Dumper(\@vals); # would print [ undef ] not [ ]
my $var = { first => scalar $q->param('first'), second => scalar $q->param('second'), };