perl-embperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From "Angus Lees" <gusl...@gmail.com>
Subject Re: file upload
Date Sun, 28 May 2006 10:31:24 GMT
On 5/25/06, Todd White <tmwhite@merit.edu> wrote:
>
> Shoot!  Current circumstances might not allow for a recompiling of
> Embperl.  Does anyone know of any possible work around?
>

The problem comes from a change in behaviour of CGI.pm in versions 3.01+

So you could downgrade CGI.pm.  Alternatively, the relevant part of the
patch is just stashing the $cgi object somewhere for the life of the
request.  You could patch Embperl.pm and put it somewhere earlier in your
@INC path, or redefine just this function in one of your apache startup
scripts, etc.

--- libhtml-embperl-perl-1.3.6.orig/Embperl.pm
+++ libhtml-embperl-perl-1.3.6/Embperl.pm
@@ -1,4 +1,3 @@
-
 ###################################################################################
 #
 #   Embperl - Copyright (c) 1997-2001 Gerald Richter / ECOS
@@ -935,7 +934,11 @@
                     else
                         {
                        @ffld = $cgi->param;
-
+
+                       # CGI.pm 3.01+ removes files on DESTROY, so stash
+                       # the CGI object somewhere
+                       $$req{'___CGI___'} = $cgi;
+
                        my $params ;
                        foreach ( @ffld )
                            {


-- 
- Gus

Mime
View raw message