Dotaz: Získávání dat z MySQL v PERL

[Saky]

Dobrý den. V současnosti čerpám data programem z txt souboru, který má formát:

klic = hodnota
klic1 = hodnota1
....

V PERL to mám nějak takto:

while(($klic, $hodnota) = each(%data)) {
if ($arg =~ /$klic/i) {      
print $hodnota;
}
}

Nyní bych chtěl pro data použít MySQL databázi. V tabulce mám sloupce id, klic a hodnota. Jakým způsobem se dá z databáze získat hodnota, odpovídající klíči? Díky za každou radu

Odpovědi

[ubuntak]

man DBI

[faha]

K získávání dat z MySQL je výhodné v Perlu využít modul DBI.

DBI (database-independent interface) - což je abstraktní vrstva pro práci s DB v Perlu

DBD::mysql - ovladač pro mysql použitý v DBI

Net::MySQL - implementace protokolu client-server

---

Přečtěte si dokumentaci k DBI / použijte Google / kupte si knihu

Malá ukázka.

http://www.danchan.com/feature/2000/10/16/mysql/mysql.htm

[pht]

Přístup do databáze se dělá obecně přes DBI. Nad tím existují nějaké nadstavby např. DBIx::InsertHash by mohlo dělat to co chcete, ale raději bych doporučoval zůstat při zemi, použít jednoduché DBI a ten jeden SELECT si napsat.

[Saky]

Vyřešeno, díky všem