--000e0cd0ed46268ae6047c55a328
Content-Type: text/plain; charset=ISO-8859-1
Hi,
I did this simple code:
*
package test::test; *
* use Apache2::RequestRec ();
use Apache2::RequestUtil ();
use Apache2::SubRequest ();
use Apache2::Filter ();
use APR::Table ();
use Apache2::Const -compile => qw(OK REDIRECT DECLINED);
use constant BUFF_LEN => 1024;
sub handler {
my $f = shift;
my $return_value=Apache2::Const::DECLINED;
$f->subprocess_env("Variable" => "value");
return $return_value;
} *
and I have configured in my httpd.conf:
*PerlTransHandler +test::test*
now I make a php code that read the environment variable with no problem,
but in access_log file I see that write to access raw:
::1 - - [04/Jan/2010:13:05:11 +0100] "GET /test.php HTTP/1.1" 200 1791
::1 - - [04/Jan/2010:13:05:11 +0100] "GET /test.php HTTP/1.1" 200 1791
why ?
Idel
--000e0cd0ed46268ae6047c55a328
Content-Type: text/html; charset=ISO-8859-1
Content-Transfer-Encoding: quoted-printable
Hi,<br>I did this simple code:<br><i><br>package test::test; </i><br><i>=A0=
use Apache2::RequestRec ();<br>=A0 use Apache2::RequestUtil ();<br>=A0 use=
Apache2::SubRequest ();<br>=A0 use Apache2::Filter ();<br>=A0 use APR::Tab=
le (); <br>
=A0 use Apache2::Const -compile =3D> qw(OK REDIRECT DECLINED);<br>=A0 us=
e constant BUFF_LEN =3D> 1024;<br><br>sub handler=A0=A0=A0 {<br>=A0=A0=
=A0 my $f =3D shift;<br>=A0=A0=A0 my $return_value=3DApache2::Const::DECLIN=
ED;<br>=A0=A0=A0 $f->subprocess_env("Variable" =3D> "v=
alue");=A0=A0=A0 <br>
=A0=A0=A0 return $return_value;<br>} </i><br><br>and I have configured in m=
y httpd.conf:<br><br><i>PerlTransHandler +test::test</i><br><br>now I make =
a php code that read the environment variable with no problem, but in acces=
s_log file I see that write to access raw:<br>
<br>::1 - - [04/Jan/2010:13:05:11 +0100] "GET /test.php HTTP/1.1"=
200 1791<br>::1 - - [04/Jan/2010:13:05:11 +0100] "GET /test.php HTTP/=
1.1" 200 1791<br><br>why ?<br><br clear=3D"all">Idel<br><br>
--000e0cd0ed46268ae6047c55a328--
