Re: Re: multiple db connects

[jreades]

A useful addition to this might be to stash the returned db handle.

If you're running Apache then then you can do something like the following to share a single connection amongst several scripts:

if (! $Global::var{'dbh'}) {

    my $sdn  = "DBI:mysql:database=$db;host=$host";
    my $dbh  = DBI->connect($sdn, $user, $pass) || die ("Unable to con
+nect to DB: $DBI::errstr");
    $Global::var{'dbh'} = $dbh;
}
return ($Global::var{'dbh'});

[merlyn]

You can't "share a single connection among multiple scripts" if they all live in separate spaces, whether you're using Apache or not!

If you were talking about mod_perl's Apache::Registry "scripts" (really, handlers coded on the fly from script-like things), then you don't need to do any of this mess either. Just include Apache::DBI, and it autoshares for you!

-- Randal L. Schwartz, Perl hacker