Re: mp1 to mp2: server info in startup.pl

2005-08-24 Thread Philip M. Gollucci
Tom Schindl wrote: I would expect none of these solutions to work: Don;t know if you read my reply to that with the handler example. 1. Solution: - Where from should perl know which port you are refering to / interested in or turn it the other way round what happens when you server

Re: mp1 to mp2: server info in startup.pl

2005-08-24 Thread Tom Schindl
-BEGIN PGP SIGNED MESSAGE- Hash: SHA1 Philip M. Gollucci wrote: >> In mp2 I am doing this: >> --- >> use Apache2::ServerRec (); >> use Apache2::ServerUtil (); >> my $s = Apache2::ServerUtil->server(); >> warn "port = ",$s->port(),"\n"; > > Try > use Apache2::RequestUti

Re: mp1 to mp2: server info in startup.pl

2005-08-23 Thread Philip M. Gollucci
Philip M. Gollucci wrote: In mp2 I am doing this: --- use Apache2::ServerRec (); use Apache2::ServerUtil (); my $s = Apache2::ServerUtil->server(); warn "port = ",$s->port(),"\n"; Try use Apache2::RequestUtil (); Apache2::RequestUtil->request()->get_server_port() Though I d

Re: mp1 to mp2: server info in startup.pl

2005-08-22 Thread Ted
Thanks for your response. I tried that, but got an error: [Mon Aug 22 14:43:52 2005] [error] Global $r object is not available. Set:\n\t PerlOptions +GlobalRequest\nin httpd.conf at /usr/local/apache2/conf/startup.pl line 82.\nCompilation failed in require at (eval 2) line 1.\n [Mon Aug 22 14

Re: mp1 to mp2: server info in startup.pl

2005-08-22 Thread Philip M. Gollucci
In mp2 I am doing this: --- use Apache2::ServerRec (); use Apache2::ServerUtil (); my $s = Apache2::ServerUtil->server(); warn "port = ",$s->port(),"\n"; Try use Apache2::RequestUtil (); Apache2::RequestUtil->request()->get_server_port() Though I don't see why your method doe