Perl und DBI: Das erste Skript mit MySQL

In diesem Artikel werden wir versuchen zu verstehen, zusammen, wie man mysql db mit Perl nutzen.
Es sollte unmittelbar vorausgehen, die für diese Aufgabe benötigt das Perl DBI-Treiber (Database Interface) oder eine Bibliothek, die liguaggio ermöglicht als Schnittstelle zu unserer Datenbank.
Nicht nur das, wir brauchen auch die MySQL-DBD-Modul-Schnittstelle oder die Kommunikation in unserer db.
Vor peranto sollten Sie auf unserem Server, DBI und DBD überprüfen.
Wenn beide Treiber vorhanden sind, können wir weiter. Ansonsten, bevor Sie das tun, werden Sie beide installieren müssen.

Hier ist ein kleines Perl, dass scriptin (genau) diese Treiber verwendet, um Daten in unserer MySQL db geben.
Code:

 #! / Usr / bin / perl-w

 


 



 use DBI;

 

 



 # Access-Daten in mysql db

 






 $ Database = "dbname";







 $ User = "root";







 $ Pass = "geheim";







 $ Driver = "DBI: mysql";

 

 



 # Verbindung zur DB

 






 my $ dbh = "DBI -> connect ($ driver: database = $ database, $ user, $ pass)

 






 or die "Kann nicht verbinden!"

 

 



 # Legen Sie einige Daten in DB

 






 $ Dbh-> do ("INSERT INTO Tabelle (Feld1, Feld2) VALUES ('foo', 'bar')");

 

 



 # Aus der db Disconnect

 






 $ Dbh-> disconnect;

 

 



 exit;