use CGI;
my $q = CGI->new;

my @list  = map { $q->param('xxx'.$_) } 1 .. $q->param('xxxc');
# values now sequential in @list.