In der Regel öffnen Sie eine einzelne Verbindung zu einer Datenbank und führen dann alle erforderlichen Vorgänge durch, indem Sie eine Sequenz von SQL-Anweisungen ausführen. Öffnen Sie eine Verbindung mithilfe der Methode "connect". Der Rückgabewert ist ein Handle zur Datenbankverbindung, mit dem Sie die nachfolgenden Vorgänge in dieser Verbindung durchführen.

Die Parameter der Methode "connect" lauten wie folgt:

Das nachstehende Codebeispiel öffnet und schließt eine Verbindung zur SQL Anywhere-Beispieldatenbank. Bevor Sie dieses Skript ausführen, müssen Sie den Datenbankserver und die Beispieldatenbank starten.

#!/usr/local/bin/perl -w
#
use DBI;
use strict;
my $database = "demo";
my $data_src = "DBI:SQLAnywhere:SERVER=$database;DBN=$database";
my $uid      = "DBA";
my $pwd      = "sql";
my %defaults = (
     AutoCommit => 1, # Autocommit enabled.
     PrintError => 0  # Errors not automatically printed.
   );
my $dbh = DBI->connect($data_src, $uid, $pwd, \%defaults)
  or die "Cannot connect to $data_src: $DBI::errstr\n";
$dbh->disconnect;
exit(0);
__END__

Optional können Sie den Wert des Benutzernamens oder des Kennworts an die Datenquellen-Zeichenfolge anhängen und nicht als getrennte Parameter übergeben. Wenn Sie dies tun, übergeben Sie eine leere Zeichenfolge für das entsprechende Argument. Beispiel: Das oben gezeigte Skript kann geändert werden, indem die Anweisung, die die Verbindung öffnet, durch die nachstehenden Anweisungen ersetzt wird:

$data_src .= ";UID=$uid";
$data_src .= ";PWD=$pwd";
my $dbh = DBI->connect($data_src, '', '', \%defaults)
  or die "Cannot connect to $data_src: $DBI::errstr\n";