perl-embperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Gunnar Wolf <gw...@gwolf.org>
Subject Re: Requiring strictness everywhere
Date Fri, 11 Aug 2006 14:52:18 GMT
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


Mime
View raw message