You can initialize CGI.pm with the query you want, like this:

my $query = (split /\?/, $ENV{HTTP_REFERER}, 2)[1];

my $q = new CGI($query);

...
[download]

But you cannot always rely on HTTP_REFERER to be set, so why not post the query directly the the perl script?

--
Leviathan.