Using perl Syntax Highlighting
my $dbh = DBI->connect("dbi:Pg:dbname=$mibase;port=5432", $user, $password, {AutoCommit => 1}) or die DBI->errstr;
print "Esta usted conectado a la base $mibase\n";
Coloreado en 0.002 segundos, usando
GeSHi 1.0.8.4
Necesitas crear primero todas las variables indicadas y ajustarlas a tu caso.
Una vez conectado la cuestión ya es qué vas a hacer entonces. Para ejecutar una consulta tienes que hacerlo en dos pasos: 1.- crear el esqueleto de la consulta dejando huecos para los valores (llamados
placeholders); y 2.- aportar el material de relleno variable de los huecos. Para que nos entendamos (no se escribe así pero la idea es lo importante), sería algo de tipo:
select uncampo from mitabla where blabla = ... and blo = ... and blublu > ... ; y luego añadir esos tres valores ausentes en un segundo paso. Es importante que lo hagas así por diversas razones, entre ellas la seguridad.
Y hablando de seguridad, $password puede sustituirse simplemente por '' si no deseas ponerlo en texto plano donde alguien pueda verlo.