@array_of_submitted_parameter_names = $query->param; #### my @ary = $query->param; my $pageid; for (@ary) { if (lc $_ eq 'pageid') { $pageid = $query->param($_); } }