Hi there,
On Tue, 11 Jun 2002, Harnish, Joe wrote:
> Does anyone know of issues with mod_perl and post?
Here's one.
73,
Ged.
>From [EMAIL PROTECTED] Tue Jun 11 18:16:11 2002
Date: Wed, 20 Mar 2002 19:20:29 +0000 (GMT)
From: Ged Haywood <[EMAIL PROTECTED]>
To: Stas Bekman <[EMAIL PROTECTED]>
Subject: Re: mod_perl does not see multipart POSTs --> SOLVED
Hi Stas,
On Thu, 21 Mar 2002, Stas Bekman wrote:
> Vuillemot, Ward W wrote:
> > Using the POST2GET snippet was interferring.
I kept trying to tell him that...
> Ward, Ernest, can you please send the me the required changes
If you look in CGI.pm you'll see that the file upload code won't get
called if the request is GET, so POST2GET guarantees that it will fail
for CGI.pm. Here's a snippet from the modified CGI.pm that I sent to
him and which it seems he never bothered to try out.
----------------------------------------------------------------------
# Process multipart postings, but only if the initializer is
# not defined.
# debugging... --GWH--
my $tempEnvContentType = $ENV{'CONTENT_TYPE'};
print STDERR "CGI.pm: \$ENV{'CONTENT_TYPE'}=[$tempEnvContentType]\n";
print STDERR "CGI.pm: \$meth=[$meth]\n";
if ($meth eq 'POST'
&& defined($ENV{'CONTENT_TYPE'})
&& $ENV{'CONTENT_TYPE'}=~m|^multipart/form-data|
&& !defined($initializer)
) {
my($boundary) = $ENV{'CONTENT_TYPE'} =~ /boundary=\"?([^\";,]+)\"?/;
$self->read_multipart($boundary,$content_length);
last METHOD;
}
----------------------------------------------------------------------
73,
Ged.
