On Thu, 8 Sep 2005, Udlei Nattis wrote:
Hi,
I porting my shared store to modperl2, but for redirect i have one problem:
[Thu Sep 08 16:50:08 2005] [notice] Apache/2.0.54 (Unix) mod_perl/2.0.1
Perl/v5.8.4 configured -- resuming normal operations
---> [Thu Sep 08 16:50:09 2005] [error] [client 127.0.0.1] Can't locate
object method "STORE" via package "APR::Table" at
/export/Test/lib/Test.pm line 25.\n
I dont understand this problem
In
package Test;
use strict;
use warnings FATAL => 'all';
#use mod_perl;
use Apache2::RequestIO ();
use Apache2::RequestRec ();
use Apache2::Const -compile => qw(OK HTTP_MOVED_TEMPORARILY);
sub handler {
my $r = shift;
my $location = "http://demo.nixus.com.br";
$r->err_headers_out->{'Pragma'} = "no-cache";
Apache2::Const::OK;
}
1;
try adding
use APR::Table ();
For such errors, ModPerl::MethodLookup is really handy:
bash$ perl -MModPerl::MethodLookup -e print_method STORE
To use method 'STORE' add:
use APR::Table ();
--
best regards,
randy kobes