--- Tom Schindl <[EMAIL PROTECTED]> wrote:
> Beberle wrote:
>
> >Ok, I've read the documentation and searched the
> >archives for a similar problem but no luck. If
> anyone
> >has any suggestions, I'd be most grateful.
> >
> >Here's my situation:
> >
> >I've got Apache 2.0.46 with mod_perl 1.99_09
> (called
> >2.0-tobe in the documentation) both of which were
> >installed by the Red Hat Enterprise installation.
> >
> >I copied this startup file form the mod_perl docs:
> >
> >#!/usr/bin/perl
> ># File: startup.pl
> >use Apache2 ();
> >use lib '/etc/httpd/lib/perl';
> >
> >use ModPerl::Util (); #for CORE::GLOBAL::exit
> >use Apache::compat ();
> >use Apache::RequestRec ();
> >use Apache::RequestIO ();
> >use Apache::RequestUtil ();
> >
> ># commented this out because Apache::ServerRec
> ># doesn't exist on the server and throws errors
> >
> >#use Apache::ServerRec ();
> >
> >use Apache::ServerUtil ();
> >use Apache::Connection ();
> >use Apache::Log ();
> >use APR::Table ();
> >use ModPerl::Registry ();
> >use Apache::Const -compile => ':common';
> >use APR::Const -compile => ':common';
> >use CGI qw(-compile :all);
> >
> >1;
> >-----------------------------------
> >
> >In my perl.conf file, I've added the following
> lines:
> >
> >LoadModule perl_module modules/mod_perl.so
> >PerlRequire conf/startup.pl
> >
> ># this is a test module
> >PerlTransHandler Apache::DefaultTrans
> >--------------------------------------
> >
> >In my test module (modified from the O'Reilly
> "Writing
> >Apache Modules" book), I have the following code:
> >
> >package Apache::DefaultTrans;
> ># File: Apache/DefaultTrans.pm
> >
> >use Apache::Const qw(:common);
> >use Apache::RequestIO ();
> >use Apache::RequestRec ();
> >use Apache::Log ();
> >use Apache::Directive ();
> >
> >sub handler {
> > my $r = shift;
> > my $uri = $r->uri;
> >
> > my $tree = Apache::Directive::conftree();
> > my $document_root =
> >$tree->lookup('DocumentRoot');
> >
> > $r->filename($document_root . $r->uri);
> >}
> >---------------------------------
> >
> >This throws the following error:
> >
> >[error] [client 10.1.0.28] Usage:
> >Apache::Directive::conf tree(CLASS) at
> >/etc/httpd/lib/perl/Apache/DefaultTrans.pm
> >
> >I've looked up this function in the documentation
> and
> >this seems to be the right way to use it. Oddly,
> if I
> >try to stuff some random variable in, like:
> >
> >my $tree = Apache::Directive::conftree($tree);
> >
> >the error goes away, but $tree is empty.
> >
> >Any help is appreciated. Thanks.
> >
> >
> >
> >
> >__________________________________
> >Do you Yahoo!?
> >Meet the all-new My Yahoo! - Try it today!
> >http://my.yahoo.com
> >
> >
> >
> >
> >
> your version is out-dated you'll have to upgrade
> your mod_perl and apache
> nowadays we are at apache-2.52 and mp-1.99_17
>
http://perl.apache.org/docs/2.0/api/Apache/Directive.html#C_conftree_
> The method you try to use is part of mp-1.99_12 take
> a look at the since
> information.
>
> Tom
Ok, just installed Apache 2.0.52 and mod_perl 1.99_17
and everything seems to be working fine. Thanks for
your help.
__________________________________
Do you Yahoo!?
The all-new My Yahoo! - Get yours free!
http://my.yahoo.com
--
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html