Perl y DBI: el primer guión con MySQL

En este artículo vamos a tratar de comprender juntos cómo utilizar MySQL con Perl db.
Es deberán preceder que para esta tarea las necesidades del conductor Perl DBI (Interfaz de base de datos), o una biblioteca que permite la liguaggio a la interfaz de base de datos.
No sólo eso, también necesitamos el módulo DBD, interfaz o la comunicación en nuestra db.
Antes de peranto usted debe comprobar en nuestro servidor, DBI y DBD.
Si ambos pilotos están presentes podemos continuar. De lo contrario, antes de hacerlo, usted tendrá que instalar ambos.

Aquí hay una pequeña perl que utiliza scriptin (precisamente) en estos controladores para introducir datos en nuestra base de datos MySQL.
Código:

 #! / Usr / bin / perl-w

 


 



 use DBI;

 

 



 # Acceso a datos en mysql db

 






 Base de datos $ = "dbname";







 $ Usuario = "root";







 $ Pass = "secreto";







 $ Driver = "DBI: mysql";

 

 



 # Conectarse a la BD

 






 my $ dbh = "DBI -> connect ($ driver: base de datos = pass $ database, $ usuario, $)

 






 or die "No se puede conectar!"

 

 



 # Introduzca algunos datos en DB

 






 $ Dbh-> do ("INSERT INTO Tabla (Campo1, Campo2) VALUES ('foo', 'bar')");

 

 



 # Desconectar de la base de datos

 






 $ Dbh-> desconectar;

 

 



 salida;