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 - gwolf gwolf.org - (+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: embperl-unsubscribe perl.apache.org
For additional commands, e-mail: embperl-help perl.apache.org
|