The only missing thing to make the picture complete is PERL5LIB, which bites us back, so we need to instrument Apache-Test to be able to set PerlSwitches -I for us (or <Perl>use lib</Perl> for mp1).
how about this?
PerlSwitches [EMAIL PROTECTED]@
might not want to die for unrecognized variables anymore, though.
I'd use a totally different name here, so that noone will get mislead that PERl5LIB is actually working under -T. e.g. PREFIX_LIBS? or even better don't use %ENV, but add a new option? -perllibs? or both? and make it smart enough to traverse the top dir for lib, arch. probably the easiest to add it to modperl_inc.pl with 'use lib' which will do the job.
[ my $key = lc $1;
- exists $self->{vars}->{$key}
- ? $self->{vars}->{$key}
- : die "invalid token: [EMAIL PROTECTED]@ $file\n";
+ exists $self->{vars}->{$key} ? $self->{vars}->{$key} :
+ exists $ENV{$1} ? $ENV{$1} :
+ die "invalid token: [EMAIL PROTECTED]@ $file\n";
]ge;
I wish we had dor() already available. I'm never entirely sure the precedence of the nested ? : ? : and would rather avoid it.
with dor it'd look like:
$self->{vars}->{$key} // $ENV{$1} // die "invalid token: [EMAIL PROTECTED]@ $file\n";
or
$self->{vars}->{$key} dor $ENV{$1} dor die "invalid token: [EMAIL PROTECTED]@ $file\n";__________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com
--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
