LINUXSOFT.cz Přeskoč levou lištu
Uživatel: Heslo:  
   CZUKPL

> Perl (78) - Databáze - úvod

Perl Tímto dílem začínáme miniseriál o práci s SQL databázemi. Dnes se budeme zabývat některými teoretickými aspekty a také se k databázi poprvé připojíme.

4.5.2009 01:00 | Jiří Václavík | Články autora | přečteno 11288×

DBI nebo-li DataBase Interface je nástroj pro přístup k SQL databázím. Je to rozhraní, které umožňuje přístup ke všem známým a některým méně známým databázovým systémům.

Cílem DBI je vytvoření jednotného rozhraní pro přístup k různým databázovým systémům. Jeho architektura se skládá ze dvou částí. Samotné DBI definuje pouze rozhraní pro uživatele. O přístup ke konkrétním databázovým systémům se starají takzvané DataBase Drivery (DBD).

Pro každou podporovanou databázi existuje speciální DBD ve formě modulu. Tento mechanizmus je výhodný z hlediska přenositelnosti. Protože DBI je na databázovém systému nezávislá a DBD závislá část, někdy se také akronymu DBI přiřazuje význam DataBase Independent a akronymu DBD DataBase Dependent.

Všechny nejznámější databáze již mají svůj DBD a lze je tedy ve spolupráci s Perlem používat. Seznam všech dostupných DBD modulů je například v archivu CPAN.

K tomu, abychom mohli používat některý z databázových systémů, ho musíme mít zvlášť nainstalovaný. Pokud žádný nemáte nebo se jen chcete dozvědět něco více o databázích, pak využijte zde na Linuxsoftu speciální seriály k tomu určené: Postgres od Marka Olšavského nebo MySQL od Petra Zajíce.

Práce s databází

Pokud máme již vše připraveno (tedy hlavně dostupnou databázi a modul DBI), můžeme začít psát Perl skripty, které umějí s databází pracovat. Prvním krokem k tomu nezbytným je navázání spojení s tou kterou databází. Poté můžeme klást dotazy v jazyce SQL a nakonec databázové spojení opět uzavřeme.

Kontrola ovladačů

Ještě než se začneme připojovat, měli bychom vědět, pro které databáze máme k dispozici ovladače (drivery). Jako první krok tedy necháme tedy provést následující příkaz.

$ perl -MDBI -e 'print DBI->available_drivers'

Často ještě lepší je zobrazení s čísly instalovaných verzí.

$ perl -MDBI -e 'DBI->installed_versions'

Pokud je námi požadovaný systém mezi těmi jmenovanými, můžeme se již připojit. V opačném případě bude ještě nutné sehnat příslušné DBD moduly, nejsnadněji z CPAN.

Navázání spojení

Abychom se mohli připojit, musíme zpravidla znát několik údajů.

  • jméno databázového systému, resp. jemu příslušného ovladače
  • jméno konkrétní databáze
  • případně umístění databáze (počítač, port)
  • login a heslo uživatele, který má přístup k této databázi

Poznámka - Slovo databáze má dva významy. Prvním je nějaká uložená množina dat a druhým je tato množina i s konkrétními softwarovými nástroji pro jejich manipulaci. Tam, kde je to zásadní, budeme tu druhou variantu nazývat databázovým systémem.

Samotné připojení k databázi nám zajistí metoda connect, která vrací ovladač. Tato metoda vyžaduje jako argument právě výše uvedené identifikační údaje a navíc je možné přidat hash speciálních atributů. Obecný zápis volání metody connect tedy vypadá takto.

$dbh = DBI->connect($zdroj_dat, $uzivatel, $heslo, \%atributy);

Alespoň pro představu uveďme některé příklady jako obsah prvního argumentu této metody.

"dbi:JMÉNO_DRIVERU:JMÉNO_DATABÁZE"
"dbi:JMÉNO_DRIVERU:dbname=JMÉNO_DATABÁZE"
"dbi:JMÉNO_DRIVERU:dbname=JMÉNO_DATABÁZE;host=HOST;port=PORT"
"dbi:JMÉNO_DRIVERU:JMÉNO_DATABÁZE@HOST:PORT"

Volání metody connect má nejen z tohoto hlediska řadu rozmanitých možností. Většinou si však vystačíme jen se základními znalostmi. Pro více informací na toto téma odkažme na dokumentaci.

Nyní se již podívejme, jak by tento příkaz vypadal konkrétně pro systém Postgres, databázi testovaci_db, uživatele user s heslem password. Navíc přidáme or die podmínku a příkaz pro odpojení.

use DBI;
my $dbh = DBI->connect("dbi:Pg:dbname=testovaci_db", "user", "password") or die "Nelze se spojit s databází!";
...
$dbh->disconnect;

Pro ukázku si ještě ukažme, jak bychom se připojili k systému MySQL.

my $dbh = DBI->connect("dbi:mysql:dbname=testovaci_db", "user", "password") or die "Nelze se spojit s databází!";

Pro toho, kdo používá standardního řádkového klienta pro systém MySQL, lze poslední příkaz přirovnat k následujícímu příkazu zadaného do shellu.

$ mysql -uuser -ppassword
Enter password:
Welcome to the MySQL monitor.  Commands end with ; or \g.
Your MySQL connection id is 1
Server version: 5.0.51a SUSE MySQL RPM

Type 'help;' or '\h' for help. Type '\c' to clear the buffer.

mysql> use testovaci_db
Database changed
mysql>

Na závěr uveďme, že první argument předávaný metodě connect lze získat metodou data_sources, vyvolanou nad objektem $dbh.

Ošetřování chyb

Existují tři hlavní metody, které vracejí informace o chybách. Tři proto, protože každá vrací chybu v jiném formátu.

První z nich, metoda err, vrací chybový celočíselný kód. Tento kód je dostupný pouze do volání další metody (to platí pro skoro všechny metody, výjimkou je pochopitelně metoda err a pár dalších), poté je nahrazen výsledkem tohoto volání. Ke kódu, který vrací err lze přistupovat také přes proměnnou $DBI::err.

Další a podobnou metodou je errstr nebo $DBI::errstr. Tato metoda vrací řetězec, který chybu popisuje.

Ještě existuje jedna metoda pro detekci chyb. state vrací kód podle standardu SQLSTATE.

Jak již jsme se zmínili, metoda connect přijímá jako poslední volitelný argument odkaz na hash atributů. Právě dvěma z těchto atributů jsou atributy RaiseError a PrintError. Oba je můžeme nastavit na hodnoty 1 (zapnuto) nebo 0 (vypnuto).

Pomocí zapnutého RaiseError dáme na vědomí, že při chybě má dojít k okamžitému volání příkazu die. Naopak PrintError pouze tiskne chybu pomocí warn na standartní chybový výstup.

Zajímavá situace nastane, pokud zkusíme oba atributy vypnout - tedy pokud zavoláme metodu connect následovně.

$dbh = DBI->connect("dbi:mysql:dbname=testovaci_db", "user", "password", {RaiseError => 0, PrintError => 0})
     or die "Nelze spojit s mysql. ".$db->errstr;

Nyní nebudou hlášeny žádné chyby a všechna volání metod nad objektem $dbh si musíme ošetřit sami pomocí konstrukce or die a metody errstr.

Další možností vlastního ošetřování je atribut HandleError. Tomu lze přiřadit odkaz na podprogram, který bude proveden po vyvolání chyby. Je tak možné si například měnit text chybových hlášení.

Atributů je celá řada a jejich kompletní popis lze nalézt v dokumentaci.

Verze pro tisk

pridej.cz

 

DISKUZE

Nejsou žádné diskuzní příspěvky u dané položky.



Příspívat do diskuze mohou pouze registrovaní uživatelé.
> Vyhledávání software
> Vyhledávání článků

18.1.2017 0:49 /František Kučera
Členové a příznivci spolku OpenAlt se pravidelně schází v Praze a Brně. Fotky z pražských srazů za uplynulý rok si můžete prohlédnout na stránkách spolku. Příští sraz se koná už 19. ledna – tentokrát je tématem ergonomie ovládání počítače – tzn. klávesnice, myši a další zařízení. Také budete mít příležitost si prohlédnout pražský hackerspace Brmlab.
Přidat komentář

8.1.2017 17:51 /František Kučera
Máš rád svobodný software a hardware nebo se o nich chceš něco dozvědět? Přijď na sraz spolku OpenAlt, který se bude konat ve čtvrtek 19. ledna od 18:30 v pražském hackerspacu Brmlab. Tentokrát je tématem srazu ergonomie ovládání počítače – tzn. klávesnice, myši a další zařízení. K vidění bude mechanická klávesnice dasKeyboard, trackball Logitech nebo grafický tablet (a velký touchpad) Wacom. Přineste i vy ukázat svoje zajímavé klávesnice a další HW. V 18:20 je sraz před budovou, v 18:30 jdeme společně dovnitř, je tedy dobré přijít včas. Podle zájmu se později přesuneme do nějaké restaurace v okolí.
Přidat komentář

1.12.2016 22:13 /František Kučera
Máš rád svobodný software a hardware nebo se o nich chceš něco dozvědět? Přijď na sraz spolku OpenAlt, který se bude konat ve čtvrtek 8. prosince od 18:00 v Radegastovně Perón (Stroupežnického 20, Praha 5). Sraz bude tentokrát tématický. Bude retro! K vidění budou přístroje jako Psion 5mx nebo Palm Z22. Ze svobodného hardwaru pak Openmoko nebo čtečka WikiReader. Přijďte se i vy pochlubit svými legendami, nebo alespoň na pivo. Moderní hardware má vstup samozřejmě také povolen.
Komentářů: 1

4.9.2016 20:13 /Pavel `Goldenfish' Kysilka
PR: Dne 22.9.2016 proběhne v Praze konference Cloud computing v praxi. Tématy bude např. nejnovější trendy v oblasti cloudu a cloudových řešení, provozování ERP v cloudu, o hostování různých typů softwaru, ale třeba i o zálohování dat nabízeném podnikům formou služby.
Přidat komentář

1.9.2016 11:27 /Honza Javorek
Česká konference o Pythonu, PyCon CZ, stále hledá přednášející skrz dobrovolné přihlášky. Máte-li zajímavé téma, neváhejte a zkuste jej přihlásit, uzávěrka je již 12. září. Konference letos přijímá i přednášky v češtině a nabízí pomoc s přípravou začínajícím speakerům. Řečníci mají navíc vstup zadarmo! Více na webu.
Přidat komentář

27.8.2016 8:55 /Delujek
Dnes po 4 letech komunitního vývoje vyšla diaspora 0.6.0.0
diaspora* je open-source, distribuovaná sociální síť s důrazem na soukromý
Více v oficiálním blog-postu
Přidat komentář

24.8.2016 6:44 /Ondřej Čečák
Poslední týden CFP LinuxDays 2016; pokud byste rádi přednášeli na LinuxDays 2016 8. a 9. října v Praze, můžete svůj příspěvek přihlásit, následovat bude veřejné hlasování.
Přidat komentář

9.8.2016 22:56 /Petr Ježek
Zařazení souborového systému reiser4 do jádra 4.7 znamená konečně konec patchování jádra jen kvůli možnosti použít reiser4.
Přidat komentář

   Více ...   Přidat zprávičku

> Poslední diskuze

18.1.2017 20:18 / martin horky
Spolupraca linuxu a microsoftu

17.1.2017 9:57 / Pavel Hrubeš
Re: Externí USB televizní karta

4.1.2017 11:24 / Marcum
extension to house

3.1.2017 10:09 / bolden
country cottages

4.12.2016 22:54 / František Kučera
Dárek

Více ...

ISSN 1801-3805 | Provozovatel: Pavel Kysilka, IČ: 72868490 (2003-2017) | mail at linuxsoft dot cz | Design: www.megadesign.cz | Textová verze