RE: File upload problem
[prev] [thread] [next] [Date index for 2005/04/30]
From: Bart Terryn
Subject: RE: File upload problem
Date: 11:52 on 30 Apr 2005
Subject: RE: File upload problem
Date: 11:52 on 30 Apr 2005
Hi everybody It turned out to be a CGI.pm problem related to the setup I'm running. And here is the solution: Apparantly CGI.pm V3.01 no longer allows you to force your TMPDIRECTORY to a folder of your choice. This used to be possible by uncommenting line 26 to read something like: $CGITempFile::TMPDIRECTORY = 'C:/Temp'; But in the find_tempdir routine this was ignored by line 3753: undef $TMPDIRECTORY; I filed a request to the CGI.pm buglist to change this to the old behaviour. Sorry if you feel this was not a mod_perl issue, but I was sidetracked by the fact that this problem only occurred under the mod_perl environment. But all is bright and shining again Bart -----Original Message----- From: Bart Terryn [mailto:bart@xxxxxxxx.xxx] Sent: Saturday, April 30, 2005 11:42 AM To: modperl@xxxx.xxxxxx.xxx Subject: File upload problem Hi, I'm have been running mod_perl for a while now. Current situation is: -Win 2000 SP2 -Apache 2.0.47 -mod_perl 1.999.22 -Perl 5.8.3 http conf: Alias /mod_perl/ "C:/Program Files/Apache Group/Apache2/mod_perl/" <Location /mod_perl> SetHandler perl-script PerlResponseHandler ModPerl::Registry PerlOptions -ParseHeaders Options +ExecCGI </Location> But all of the sudden I'm having problems with the file uploads from a form. In the error.log file I find: CGI open of tmpfile: No such file or directory Note that those same forms gave no trouble before. Don't know what switch did create the error. My guess it is the installation of Perl5.8.3 (from a 5.8.1 version) and its accompagning CGI v3.01. Have also tried with the lastest 3.08 CGI module from CPAN I have reduced the error to the following form and its brother mod_perl script. Note also that the script is running OK when placed in the cgi-bin folder (no mod_perl). I know that is not a guarantee that it should work under mod_perl, but still it is a nice indication. Form ======== <html xmlns="http://www.w3.org/1999/xhtml"; lang="en"> <head> <title>Upload Test</title> </head> <body> <h4>Upload:</h4> <form method="post" action="/mod_perl/upload-test.pl" enctype="multipart/form-data"> <br /> <input name="file" type="file" size="60" /><br /> <input type="button" value="Cancel" onclick="window.history.go(-3)" /> <input type="submit" value="Upload File" /> </p> </form> </body></html> Script ========== #!C:\Perl\bin\perl.exe use CGI; my $q = CGI->new(); print $q->header, $q->start_html('result'),$q->h1('the uploaded file'); my $filename = $q->upload('file'); print $q->p("filename: $filename"); print $q->p("content:"); print "<pre>"; while (<$filename>) { print; } print "</pre>"; print $q->end_html; Kind Regards Bart Terryn
 |
File upload problem
|
|
 |
RE: File upload problem
|