Perl: Uploading a file from a web page

I am trying to upload a file from a web page without using:

my $query = CGI->new;
my $file开发者_JS百科name = $query->param("File");
my $upload_filehandle = $query->upload("File");

My form has several input fields and only one of them is a file name. So when I parse the form I parse all of the input fields in one pass. This means that I have the filename withough using my $filename = $query->param("File"); but, as far as I can tell, this means I can't use my $upload_filehandle = $query->upload("File"); to do the actual uploading.

Any advice is appreciated.

Regards.

How are you parsing the input fields? More importantly why are you using CGI and reimplementing some of its functionality?

This should still work:

my %args              = how_you_are_parsing_the_url();
my $query             = CGI->new;               #this parses the url as well
my $upload_filehandle = $query->upload("File"); #assuming the input is named File