Perl a DBI: prvý skript s MySQL

V tomto článku sa budeme snažiť pochopiť, ako spoločne použiť MySQL db s Perl.
Je potrebné okamžite predchádzať, že pre túto úlohu musí Perl DBI ovládač (databázové rozhranie), alebo knižnica, ktorá umožňuje liguaggio na rozhraní do našej databázy.
A nielen to, potrebujeme tiež MySQL DBD modulov, rozhranie a komunikácia v našej db.
Pred peranto by ste mali skontrolovať na našom serveri, DBI a DBD.
Ak sa obaja pretekári sú prítomní, môžeme pokračovať. Inak, než tak urobíte, budete musieť nainštalovať oba.

Tu je malý Perl, ktorý používa scriptin (presne), tieto ovládače pre zadanie údajov do našej db MySQL.
Kód:

 #! / Usr / bin / perl-w

 


 



 použitie DBI;

 

 



 # Prístupové údaje do mysql db

 






 $ Database = "dbname";







 $ User = "root";







 $ Pass = "tajomstvo";







 $ Driver = "DBI: mysql";

 

 



 # Pripojiť k DB

 






 my $ DBH = "DBI -> connect ($ vodiča: database = $ databázy, $ user, $ pass)

 






 or die "Nedá sa pripojiť!"

 

 



 # Vloženie niektoré dáta do DB

 






 $ DBH-> do ("INSERT INTO tabuľka (pole1, pole2) VALUES ('foo', 'bar')");

 

 



 # Odpojenie od db

 






 $ DBH-> Odpojiť;

 

 



 exit;