my $filename   = $q->param('upload_file');    # returns (client-side) 
+name of the file
my $filehandle = $q->upload('upload_file');   # returns handle to the 
+server-side temp file