mysql connect/disconnect

use DBI;
$dbh = DBI->connect(„DBI:mysql:database=$database:$host“,$username,$password)
or die „Fehler beim db connect: $!“;
$dbh->disconnect();

do

$mysql_query = „DELETE FROM adressen WHERE ID=202“;
$rv = $dbh->do($mysql_query);
Rückgabewert $rv Anzahl der veränderten Zeilen

prepare-execute

$mysql_query = „SELECT count(*) FROM uniques WHERE name=?“;
$sth = $dbh->prepare($mysql_query);
$rv = $sth->execute(„Bohne“);
Rückgabewert $rv wahr bei Erfolg: if ($rv) {// erfolgreich}

Zeilenweises Auslesen mit fetchrow_array

while (@row = $sth->fetchrow_array) {
print „name: $row[0] \n“;
print „owner: $row[1] \n“;
}

Zeilenweises Auslesen als Hash mit fetchrow_hashref

while ($hash = $sth->fetchrow_hashref) {
$myName = $hash->{„name“};
$myOwner = $hash->{„owner“};
}