Well well. Never too late is it?
I tried the same code, and encountered the same problem. It was solved by adding the cgi object to access the upload-member.
my $cgi = new CGI;
my $info = $cgi->uploadInfo( $filename );
print "uploadInfo:<br>";
map {print " $_: " . $info->{$_} . "<br>\n" } sort keys %$info;
Which in my case gives:
uploadInfo:
Content-Disposition: form-data; name="file";filename="C:\cool\file.t
+xt"
Content-Type: text/plain
Elegant use of map in the original snippet, though. |