8. Módulo DBI

8.1 Descripción

El módulo DBI proporciona una forma unificada, una API, de acceder a las bases de datos; es decir, que independientemente del gestor de bases de datos que usemos, usaremos las mismas funciones para hacer inserciones, actualizaciones, consultas, etc. Están soportadas tanto bases de datos "Open Source" como Postgres, miniSQL o MySQL, como algunas comerciales como Oracle, Sybase o Informix.

8.2 Ejemplo: inserción y consulta contra Postgres

#!/usr/bin/perl -w

use DBI;

$bd = DBI->connect("dbi:Pg:dbname=base_de_datos; host=host_bd","usuario","contraseña")
        or die DBI::errstr;

$insercion = "insert into tabla_ejemplo values ('valor1', 'valor2')";
$bd->do($insercion);

$consulta = "select * from tabla_ejemplo";
$prepcon = $bd->prepare($consulta);
$prepcon->execute;

while ( (@tupla = $prepcon->fetchrow_array) ) {
        print "@tupla\n";
}

$bd->disconnect;