in reply to PoCo::Server::HTTP and CGI Uploads
That's 2 warnings and 1 error. The warnings might not amount to anything, but something tells me that this line:Use of uninit val in concat (.) or string at filebot.pl line 149. Use of uninit val in subst (s///) at filebot.pl line 150. Cannot do that because Is a directory at filebot.pl line 157.
is going to break ... use File::Basename instead.$file =~ s/.*[\/\\](.*)/$1/gi;
The error is one of these two die's:
and i'd put my money on the first one. Make absolutely sure that the web server can create files in the directory and make sure that the file doesn't already exist (or take out O_EXCL from the sysopen call). You might also want to make sure that uploaded file handle is valid as well:sysopen( ... ) or die "Cannot do that because $!"; ... print UPLOADFILE or die "Cannot do that because $!";
die "not a Fh" unless ref($upload_filehandle) eq 'Fh';
jeffa
L-LL-L--L-LL-L--L-LL-L-- -R--R-RR-R--R-RR-R--R-RR B--B--B--B--B--B--B--B-- H---H---H---H---H---H--- (the triplet paradiddle with high-hat)
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Re: PoCo::Server::HTTP and CGI Uploads
by OverlordQ (Hermit) on Feb 22, 2004 at 06:40 UTC |