I am using turnkey (http://turnkey.sf.net) which tries to do some fancy
footwork to determine which mod_perl is being used:
(note that Turnkey::Root::mod_perl_version parses $ENV{MOD_PERL} and
returns 2 if it looks like mod_perl 1.99+ or 1 otherwise):
if (Turnkey::Root::mod_perl_version( $ENV{MOD_PERL} ) == 1) {
# do mod_perl1 set up stuff, like:
$STRATEGY_COOKIE = 'Apache::Cookie';
$STRATEGY_REQUEST = 'Apache::Request';
eval qq(
use Apache::Constants qw(:common DECLINED REDIRECT);
use Apache::Request;
use Apache::Cookie;
);
} elsif (Turnkey::Root::mod_perl_version( $ENV{MOD_PERL} ) == 2) {
# do mod_perl2 set up stuff, like:
$STRATEGY_COOKIE = 'CGI::Cookie';
$STRATEGY_REQUEST = 'Apache::RequestRec';
eval qq(
use Apache::Const -compile => qw(:common :http REDIRECT M_GET);
use Apache::RequestUtil;
use APR::Table;
use CGI::Cookie;
use Apache::ParseFormData;
$declined = Apache::DECLINED;
$not_implemented = Apache::HTTP_NOT_IMPLEMENTED;
$m_get = Apache::M_GET;
);
} else {
die("what kind of mod_perl is '".mod_perl_version( $ENV{MOD_PERL} )."'?");
}
Here is Turnkey::Root::mod_perl_version:
BEGIN {
sub mod_perl_version {
my $MOD_PERL_VERSION = shift if @_;
$MOD_PERL_VERSION =~ s/^.*?([\d.]+).*?$/$1/;
eval "require mod_perl";
if($MOD_PERL_VERSION >= 1.99){
$MOD_PERL_VERSION = 2;
} else {
$MOD_PERL_VERSION = 1;
}
return $MOD_PERL_VERSION;
}
}
Is there any reason to believe that would work now as opposed to not
working before? It appeared that before, at least some of the time,
even though I was using Apache2, the mod_perl_version method would
return '1' and muck things up.
Thanks,
Scott
On Tue, 2005-04-19 at 17:11 -0400, Philip M. Gollucci wrote:
> Scott Cain wrote:
>
> >I did see the rename doc, though I didn't realize that it applied to
> >something as recent as the transition to RC4->RC5. Are you currently
> >using mp1 and mp2? What about any mp applications that were written
> >prior to this name change? Of course, I can't do any testing myself,
> >because I had to blow away my installation of mp1 to get my mp2 apps to
> >work.
> >
> >
> Yes, I have both mp1 and mp2 installed on my laptop.
> You'd have to be more specific about applications.
> Some work some don't :)
>
>
--
------------------------------------------------------------------------
Scott Cain, Ph. D. [EMAIL PROTECTED]
GMOD Coordinator (http://www.gmod.org/) 216-392-3087
Cold Spring Harbor Laboratory
