Perl en DBI: de eerste script met MySQL

In dit artikel zullen we proberen te begrijpen samen hoe je MySQL db te gebruiken met Perl.
Het moet onmiddellijk vooraf dat voor deze taak de Perl DBI driver (Database Interface), of een bibliotheek die het mogelijk maakt om liguaggio interface om onze database nodig heeft.
Niet alleen dat, moeten we ook de MySQL DBD-module, interface of communicatie in onze db.
Voordat peranto moet u controleren op onze server, DBI en DBD.
Als beide coureurs aanwezig zijn kunnen we doorgaan. Anders, voordat je dat doet, moet u beide te installeren.

Hier is een kleine perl dat scriptin (precies) deze drivers gebruikt om gegevens invoeren in onze MySQL db.
Code:

 #! / Usr / bin / perl-w

 


 



 gebruik van DBI;

 

 



 # Access-gegevens naar mysql db

 






 $ Database = "dbname";







 $ User = "root";







 $ Pass = "secret";







 $ Driver = "DBI: mysql";

 

 



 # Verbinding maken met db

 






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

 






 or die "Kan geen verbinding maken!"

 

 



 # Voeg enkele gegevens in de DB

 






 $ Dbh-> do ("INSERT INTO tabel (Veld1, Veld2) VALUES ('foo', 'bar')");

 

 



 # De verbinding met het db

 






 $ Dbh-> los te koppelen;

 

 



 exit;