Utiliser les fonctions connect et disconnect de DBI :
my $db_login = "your_login"; my $db_passwd = "your_passwd"; my $db_base = "your_database"; my $dbh = DBI -> connect("dbi:Pg:dbname=$db_base", $db_login, $db_passwd ) or die $DBI::errstr; print "connected to the database\n"; # ... faire quelque chose avec la base $dbh -> disconnect or warn $DBI::errstr;
Vous trouverez plus d'informations sur la page de man suivante :
Et dans la documenation de Perl :