Description:

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]

    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]