[ LUGOS-PROG ] MySQL

[Matija Grabnar]

> Zanima me kateri modul za MySQL za perla priporo?ate. Na cpanu jih je 43...
Vsak je seveda za nekaj dober. 

Osnova za dostop do vseh SQL baz v Perlu je DBI modul (genericni database 
modul), ki potem uporablja razlicne gonlinike (DBD) za razlicne baze podatkov:
primeri so DBD::Oracle, DBD::DB2, DBD::Pg, in seveda DBD::Mysql.

Za dostop do mysql baze je torej treba instalirati DBI in DBD::mysql.

Zadeva gre nekako takole:

use DBI;

$dbh=DBI->connect("DBI:mysql:baza:hostname","username","password") ||
  die "Nisem se uspel povezati z bazo: ".DBI->errstr."\n";

# Vrinimo v bazo nekaj podatkov:
$sth=$dbh->prepare("insert into tabela values (?,?,?,?)");

while (<>) {
  $sth->execute(split(/,/,$_));
}

# Potegnimo kaj iz baze:
$bah=$dbh->prepare("select * from tabela where abra='kadabra' 
                    order by hokus,pokus");
$bah->execute;
while ($val=$dbh->fetchrow_hashref) {
  print $$val{hokus}."\n";
  foreach (keys %$val) {
     print "$_ = $$val{$_} ";
  }
  print "\n";
}

Dokumentacija je v 
perldoc DBI
perldoc DBD::mysql