No, no está bien. Fíjate
en el ejemplo del tutorial.
Solo hay que poner
use DBI;
al principio, y luego, en el connect(), es donde ya tienes indicado que vas a usar un motor PostgreSQL.
Using perl Syntax Highlighting
#!/usr/bin/perl
use warnings;
use strict;
use DBI;
my $dbh = DBI->connect("DBI:Pg:dbname=prueba;host=localhost", "javiandres","251093", {PrintError => 0, RaiseError => 1}) or die "ERROR al conectar con la base datos: $DBI::errstr\n";
Coloreado en 0.003 segundos, usando
GeSHi 1.0.8.4
(
Mira la sinopsis de DBD::Pg).
Cuando DBI ve que estás poniendo "DBI:Pg" en la cadena de conexión, sabe que tiene que cargar el módulo correspondiente DBD::Pg para poder hablar con esa base de datos.
Aquí tienes un
tutorial completo de DBI, en español. Un poco antiguo, pero puede valer. Usa para navegar las carpetas que salen en el marco de la izquierda. Debes pulsar justo en el icono de la carpeta, para abrirla. Y luego, dentro de la página, en la parte derecha, con los enlaces.