Boysenberry Payne wrote:
I'm getting the following error while trying to use Apache2::Reload
on Apache/2.0.55 (Unix) PHP/5.0.5 DAV/2 mod_apreq2-20050712/2.5.2-dev
mod_perl/2.0.2-dev Perl/v5.8.7
Can't locate mod_perl.pm in @INC (@INC contains:
/Users/boysie/mod_perl_inc /opt/local/lib/perl5/5.8.7/darwin-2level
/opt/local/lib/perl5/5.8.7
/opt/local/lib/perl5/site_perl/5.8.7/darwin-2level
/opt/local/lib/perl5/site_perl/5.8.7 /opt/local/lib/perl5/site_perl
/opt/local/lib/perl5/vendor_perl/5.8.7/darwin-2level
/opt/local/lib/perl5/vendor_perl/5.8.7 /opt/local/lib/perl5/vendor_perl
/usr/local/apache2) at
/opt/local/lib/perl5/site_perl/5.8.7/darwin-2level/Apache2/Reload.pm
line 160.\n
The only thing I can think of is that you have an Apache2::Reload in your inc
path from a pre 2.0.0 RC5 release that is being found before the one from
Apache2::Reload from 2.0.2-dev. Did you specificy mod_perl.pm as file to reload
in the config by accident?
find /Users/boysie/mod_perl_inc /opt/local/lib/perl5 -name Reload.pm | xargs \
grep -n mod_perl
Here's the loop from Reload.pm
Anyone think the
$INC{"mod_perl.pm"} = File::Spec::Functions::devnull();
change in mod_perl2.pm could be causing this.... I don't have time to test it at
the moment.
foreach my $key (sort { $a cmp $b } keys %Apache2::Reload::INCS) {
my $file = $Apache2::Reload::INCS{$key};
next unless defined $file;
next if @watch_dirs && !grep { $file =~ /^$_/ } @watch_dirs;
warn "Apache2::Reload: Checking mtime of $key\n" if $DEBUG;
my $mtime = (stat $file)[9];
unless (defined($mtime) && $mtime) {
for (@INC) {
$mtime = (stat "$_/$file")[9];
last if defined($mtime) && $mtime;
}
}
warn("Apache2::Reload: Can't locate $file\n"), next
unless defined $mtime and $mtime;
unless (defined $Stat{$file}) {
$Stat{$file} = $^T;
}
if ($mtime > $Stat{$file}) {
my $package = module_to_package($key);
ModPerl::Util::unload_package($package);
require $key;
warn("Apache2::Reload: process $$ reloading $package from $key\n")
if $DEBUG;
}
$Stat{$file} = $mtime;
}
--
END
------------------------------------------------------------
What doesn't kill us can only make us stronger.
Nothing is impossible.
Philip M. Gollucci ([EMAIL PROTECTED]) 301.254.5198
Consultant / http://p6m7g8.net/Resume/
Senior Developer / Liquidity Services, Inc.
http://www.liquidityservicesinc.com
http://www.liquidation.com
http://www.uksurplus.com
http://www.govliquidation.com
http://www.gowholesale.com