I am getting these error messages when I restart apache on a new mod perl install.
Starting httpd: Subroutine export redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 35. Subroutine name redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 46. Subroutine Apache::Constants::__AUTOLOAD redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/mod_perl.pm line 14. Subroutine Apache::Constants::SERVER_VERSION redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/mod_perl.pm line 14. Subroutine Apache::Constants::SERVER_BUILT redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/mod_perl.pm line 14. Subroutine Apache::Constants::DECLINE_CMD redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/mod_perl.pm line 14. Subroutine Apache::Constants::DIR_MAGIC_TYPE redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/mod_perl.pm line 14. Constant subroutine OK redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/mod_perl.pm line 65535. Constant subroutine DECLINED redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 65535. Constant subroutine DONE redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 65535. Constant subroutine NOT_FOUND redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 65535. Constant subroutine FORBIDDEN redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 65535. Constant subroutine AUTH_REQUIRED redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 65535. Constant subroutine SERVER_ERROR redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 65535. Subroutine AUTOLOAD redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 30. Constant subroutine AUTH_REQUIRED redefined at /usr/lib/perl5/5.6.0/Carp.pm line 4 Constant subroutine DONE redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 4 Constant subroutine SERVER_ERROR redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 4 Constant subroutine NOT_FOUND redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 4 Constant subroutine FORBIDDEN redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 4 Constant subroutine OK redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 4 Constant subroutine DECLINED redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Constants.pm line 4 Subroutine handler redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Registry.pm line 27. Subroutine compile redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Registry.pm line 174. Subroutine parse_cmdline redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Registry.pm line 190. Subroutine DESTROY redefined at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Apache/Registry.pm line 214. [ OK ] Here is my perl conf file. Alias /perl/ /home/www/dvdsex4u/perl/ PerlModule Apache::Registry <Location /perl> SetHandler perl-script PerlHandler Apache::Registry Options ExecCGI allow from all PerlSendHeader On </Location> #This bit of code, causes apache to exit gracefully on any request for Microshit files: nimbda fighter PerlModule Apache::Constants <LocationMatch "\.(ida|exe|dll|asp)$"> SetHandler perl-script PerlInitHandler Apache::Constants::DONE </LocationMatch> PerlRequire /etc/httpd/conf/perl_conf/startup.pl PerlFreshRestart On PerlWarn On I have this same setup on another server and it starts and works fine. The server appears to have started. Should I just disreguard these messages. thanks John michael ----- Original Message ----- From: "Peter Pilsl" <[EMAIL PROTECTED]> To: "Perrin Harkins" <[EMAIL PROTECTED]> Cc: <[EMAIL PROTECTED]> Sent: Wednesday, November 14, 2001 3:03 AM Subject: Re: cgi-object not cacheable > On Tue, Nov 13, 2001 at 09:18:04PM -0500, Perrin Harkins wrote: > > > One run of my script takes about 2 seconds. This includes a lot of > > > database-queries, calculations and so on. about 0.3 seconds are used > > > just for one command: $query=new CGI; > > > > That's really awfully slow. Are you positive it's running under mod_perl? > > Have you considered using Apache::Request instead of CGI.pm? > > > > its definitely running under mod_perl. But imho the time it takes to > create a new cgi-object should not depend too much wheter its running > under mod_perl or not, cause the CGI-module is loaded before. (In fact > I load in httpd.conf using PerlModule-Directive) > > > > This is not a problem of my persistent variables, cause this works > > > with many other objects like db-handles (cant use Apache::DBI cause > > > this keeps to many handles opened, so I need to cache and pool on my > > > own), filehandles etc. > > > > Whoa, you can't use Apache::DBI but you can cache database handles yourself? > > That doesn't make any sense. What are you doing in your caching that's > > different from what Apache::DBI does? > > This makes very much sense. Apache::DBI does not limit the number of > persistent connections. It just keeps all the connections open per > apache-process. This will sum up to about 20 open > database-connections, each having one postgres-client running 'idle in > transaction' - and my old small serversystem is going weak. So I cant > cache all connections, but only a limited number and so I cache on my > own :) Beside: it is done with a few lines of code, so it wasnt much > work either: > > if (exists($ptr->{global}->{dbhandles}->{_some_id_string})) > { > $dbh=$ptr->{global}->{dbhandles}->{_some_id_string}; > $dbh or err($ptr,19); # there must have been something wrong internally > if (not $dbh->ping) {$connect=1;$r='reconnect'} # we just reconnect .. > $dbh and $dbh->rollback; # this issue a new begin-transaction and avoid several problem with 'current_timestamp' that dedlivers the value > # of the time at the beginning of the transaction, even if this is hours ago. see TROUBLEREPORT1 > $r= "stored" if $r eq '-'; > } else {$connect=1;} > if ($connect) > { > $dbh=DBI->connect(connectinformation) > .... > } > > and on exit I just disconnect all handles but keeping a specified > amount. I would prefer to handle this in a special pooling-module > like Apache::DBI is, but where one can specify a maximum number of > open connections and a timeout per connection (connection will be > terminated after it was not used a specified amount of time). As soon > as I get IPC::Sharable to work I'll consider writing such a thingy. > > best, > peter > > > -- > mag. peter pilsl > > phone: +43 676 3574035 > fax : +43 676 3546512 > email: [EMAIL PROTECTED] > sms : [EMAIL PROTECTED] > > pgp-key available