use CGI;

my $q = new CGI;

my %input = $q->Vars;

foreach my $key (keys %input) {
    if ($key =~ m{\Aqty\d+}) {
        # DO SOMETHING
    }
}
[download]

my @names = CGI::param;

for my $name ( @names ){
  # Get each value.
  my $value = CGI::param($name);
  # Do something with the value.
}
[download]

I have tried doing this but the array always comes back empty. Any idea why?

I don't know for sure, but the simple reason would be that no parameters are being passed to the script. You could test this, even just to rule it out, by putting a hidden field in your form with a known value or even putting some query params at the end of the 'action' line in your form tag. I wouldn't recommend doing this permanently, but it can help debug. For example, in your form, you could:

<form action="http://my.site.com/script.pl?test1=one">
[download]

How are you testing whether the params are coming back? Just printing back to the browser? Because it's also possible that you are getting them, but you aren't displaying them properly. Can you show some code?

use CGI ’:cgi-lib’;
$params = Vars;
[download]

Then you can simply delete the submit key from that hash (unless it's read only, then make a copy first). Finally, loop through the keys of the hash.

Phil

actually it returns a hash not hash ref so: %params = Vars; #or using OO method $cgi = new CGI; %params = $cgi->Vars;

"Cogito cogito ergo cogito sum - I think that I think, therefore I think that I am." Ambrose Bierce

I tried this but it failed under strict. I used my $var = Vars(); to see if that worked, and it didn't bring values back into a hash %var.