in reply to simplifying a CGI param request

use CGI; my $q = new CGI; my %q = $q->Vars; print $q{q1}, " ", $q{q25}; print $q{"q$_"},"\n" for 1..25;
Fetching the parameter list as a hash