Confirm persistent db connection?

Athalia has asked for the wisdom of the Perl Monks concerning the following question:

I have a web resource served by Apache with a Perl interface to a MySQL database. In order to speed things up, I am using mod_perl/Apache::DBI to create a persistent database connection in a script that is run when Apache is started.

I want to make sure that I actually have a persistent connection. The scripts that query the db were not originally written with mod_perl in mind and each one contains a db connection statement. The mod_perl guide says these will be ignored if a persistent connection exists.

The obvious way to test would be to remove these statements and see if the queries fail but I'm sure there must be a more elegant and explicit test.

Does anyone know how to do this? Is there a connection id or environment variable that I can get?

Specs:

MySQL 3.22.21
Apache 1.3.9
Perl 5.004_04
Apache::DBI 0.87
DBI 1.14

Thanks in advance...

[formatted by editor]

Originally posted as a Categorized Question.

Comment on Confirm persistent db connection?

Replies are listed 'Best First'.
Re: Confirm persistent db connection? by btrott (Parson) on Sep 21, 2000 at 03:15 UTC
Turn on Apache::DBI debugging. From the docs: `To enable debugging the variable $Apache::AuthDBI::DEBUG must be set. This can either be done in startup.pl or in the user script. Setting the variable to 1, just reports about a new connect. Setting the variable to 2 enables full debug output.` [download]	[reply] [d/l]

Replies are listed 'Best First'.

Re: Confirm persistent db connection?
by btrott (Parson) on Sep 21, 2000 at 03:15 UTC

    To enable debugging the variable $Apache::AuthDBI::DEBUG
       must be set. This can either be done in startup.pl or in
       the user script. Setting the variable to 1, just reports
       about a new connect. Setting the variable to 2 enables
       full debug output.
[download]

[reply]
[d/l]