Hi,

I want to completely turn off escaping in my application (written in
EMBPERL_OBJECT_APP mode). I have configured it in the Apache
configuration - I tried both with PerlSetEnv EMBPERL_ESCMODE 0 and
with EMBPERL_INPUT_ESCMODE 0. In both cases, it works correctly the
first time I call the system, but for subsequent calls, it returns me
the escaped entities instead (switching $escmode to 7). Even having
this in place, I tried adding a «$escmode=0» to the very top of my
_base.epl... To no avail. I also added the same declaration at the
very beginning of base.pm's init function. 

I added this as the first line in _base.epl:

[- warn "Starting with: $escmode"; $escmode = 0 -]

And as the last line:

[- warn "Exiting with : $escmode " -]

After restarting Apache and calling my application a couple of times,
I get this in the logs:

[Tue Mar 27 11:51:55 2007] [warn] [19480]ERR:  32:  Warning in Perl code: 
Starting with: 0 at /home/gwolf/cvs/comas/trunk/embperl/_base.epl line 2.
[Tue Mar 27 11:51:55 2007] [warn] [19480]ERR:  32:  Warning in Perl code: 
Exiting with : 0  at /home/gwolf/cvs/comas/trunk/embperl/_base.epl line 39.
[Tue Mar 27 11:51:58 2007] [warn] [19480]ERR:  32:  Warning in Perl code: 
Starting with: 7 at /home/gwolf/cvs/comas/trunk/embperl/_base.epl line 2.
[Tue Mar 27 11:51:58 2007] [warn] [19480]ERR:  32:  Warning in Perl code: 
Exiting with : 0  at /home/gwolf/cvs/comas/trunk/embperl/_base.epl line 39.
[Tue Mar 27 11:52:13 2007] [warn] [19480]ERR:  32:  Warning in Perl code: 
Starting with: 7 at /home/gwolf/cvs/comas/trunk/embperl/_base.epl line 2.
[Tue Mar 27 11:52:13 2007] [warn] [19480]ERR:  32:  Warning in Perl code: 
Exiting with : 0  at /home/gwolf/cvs/comas/trunk/embperl/_base.epl line 39.

Now, even with $escmode as 0 during the whole page generation, the
page still displays with everything escaped.

Of course, I thought I was somehow meddling with escmode. But I swear,
I'm not touching it:

[EMAIL PROTECTED]:~/cvs/comas/trunk$ grep -ri escmode .
./embperl/_base.epl:[- warn "Starting with: $escmode"; $escmode = 0 -]
./embperl/_base.epl:[- warn "Exiting with : $escmode " -]

Any pointers on what might I be doing wrong?

Thanks,

-- 
Gunnar Wolf - [EMAIL PROTECTED] - (+52-55)5623-0154 / 1451-2244
PGP key 1024D/8BB527AF 2001-10-23
Fingerprint: 0C79 D2D1 2C4E 9CE4 5973  F800 D80E F35A 8BB5 27AF

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to