[Perl] Conexiones Persistentes de BD

[Rodrigo Gallardo]

Valentin Ortiz Ferretiz writes:
 > Ke tal,
 >=20
 > He estado leyendo acerca de las conexiones persistentes con las Base=
s de
 > Datos, bueno, ya tengo a Mason corriendo con mod_perl, reci=E9n acab=
o de
 > instalar el Apache::DBI y le agregue a mi configuraci=F3n del apache=
 un
 > archivo startup.pl que tiene lo siquiente:
 >=20
 > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dstartup.pl=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
 > $ENV{'ORACLE_HOME'}             =3D "/usr/oracle/901EE/u01/server";
 > use Apache::Registry;
 > use Apache::DBI;
 > use strict;
 >=20
 >=20
 > Apache::DBI->connect_on_init("dbi:Oracle:host=3Dmyhost.reco;sid=3DSI=
D;port=3D1521,"userid", "passwd");
 > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D
 >=20
 > Y listo, me puse a monitorear las sesiones de Oracle y efectivamente=
 hay
 > conexiones inactivas de apache, eso quiere decir que si hay conexion=
es
 > persistentes, pero la pregunta es =BFCOMO LAS UTILIZO?
 >=20
 > <%init>
 >   my $dbh =3D   =20
 > DBI->connect("dbi:Oracle:host=3Dmyhost.reco;sid=3DSID;port=3D1521","=
userid",
 > "passwd");
 > </%init>
 >=20
 > al hacer lo anterior estoy realizando una nueva conexion cierto? por=
 lo
 > tanto valio queso que iniciara la conexion desde el apache o me
 > equivoco?
 >=20
 > Me pregunto si existe una forma de almacenar en una variable global =
a
 > Apache::DBI->connect_on_init(.....) y poder usarla en cualquier
 > componente de mason...

Si m=E1l no recuerdo, estos m=F3dulos redefinen el DBI->connect, de mod=
o
que cuando lo usas, obtienes una conexi=F3n ya existente.=20

--=20
Rodrigo
PGP key 1024D/ADC9BC28 2002-02-26 [expires 2004-02-26]
Fingerprint: 7C81 E60C 442E 8FBC D975  2F49 0199 8318 ADC9 BC28