Gerald Richter dijo [Thu, Aug 10, 2006 at 06:41:58AM +0200]:
> >
> > If there is a way, please point me to it :)
> >
>
> You can use Embperl_Top_Include in your httpd.conf to add a "use strict" to
> every page
Hmh... Does not appear to work - Having that variable set in my
configuration, the pages still display even if having undeclared
variables. Besides, trying to specify it from within base.pm, I did:
$epreq->config->top_include = 'use strict;';
and got:
[Fri Aug 11 16:22:25 2006] [error] [9242]ERR: 24: Error in Perl code: Can't
locate object method "top_include" via package "Embperl::Req::Config" at
/home/gwolf/cvs/comas/trunk/embperl/base.pm line 49.
This is using Embperl 2.0rc3-1 (the version shipped in Debian
Sarge). The code does get executed, but I guess this happens inside an
eval block, so it does have any real effect - I tried also setting
EMBPERL_TOP_INCLUDE to "warn 'Alive';", and -as expected- got:
[Fri Aug 11 16:34:01 2006] [warn] [9723]ERR: 32: Warning in Perl code: Alive
at (eval 69) line 2.
[Fri Aug 11 16:34:01 2006] [warn] [9723]ERR: 32: Warning in Perl code: Alive
at (eval 74) line 2.
[Fri Aug 11 16:34:01 2006] [warn] [9723]ERR: 32: Warning in Perl code: Alive
at (eval 100) line 2, <GEN0> line 4.
[Fri Aug 11 16:34:01 2006] [warn] [9723]ERR: 32: Warning in Perl code: Alive
at (eval 105) line 2, <GEN0> line 4.
[Fri Aug 11 16:34:01 2006] [warn] [9723]ERR: 32: Warning in Perl code: Alive
at (eval 109) line 2, <GEN0> line 4.
[Fri Aug 11 16:34:01 2006] [warn] [9723]ERR: 32: Warning in Perl code: Alive
at (eval 113) line 2, <GEN0> line 4.
[Fri Aug 11 16:34:01 2006] [warn] [9723]ERR: 32: Warning in Perl code: Alive
at (eval 117) line 2, <GEN0> line 4.
[Fri Aug 11 16:34:01 2006] [warn] [9723]ERR: 32: Warning in Perl code: Alive
at (eval 121) line 2, <GEN0> line 4.
[Fri Aug 11 16:34:01 2006] [warn] [9723]ERR: 32: Warning in Perl code: Alive
at (eval 126) line 2.
[Fri Aug 11 16:34:01 2006] [warn] [9723]ERR: 32: Warning in Perl code: Alive
at (eval 130) line 2.
[Fri Aug 11 16:34:01 2006] [warn] [9723]ERR: 32: Warning in Perl code: Alive
at (eval 134) line 2.
This means, once for each file evaluated.
Greetings,
--
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]
