MySQL Perl Tutorial

Conexión a la base de datos MySQL desde un script en Perl requiere que el Perl DBI y DBD: módulos de MySQL. Estos módulos se pueden obtener de CPAN (Integral Perl Archive Network). Si está utilizando ActivePerl de ActiveState, puede descargar los módulos con el Administrador de Perl paquete. El módulo DBI se utiliza para el acceso a la base de datos general, mientras que el DBD: módulo de MySQL se utiliza para acceder a la base de datos MySQL.

Conexión y Consulta

Para utilizar el DBI: módulo de MySQL para acceder a la base de datos MySQL, se debe agregar la línea "use DBI;" al script Perl que le dice a utilizar las bibliotecas de DBI. Esta línea se debe colocar antes de intentar cualquier acceso a la base de datos. Se conecta a la base de datos con el "DBI-> connect ( 'DBI: mysql: base de datos', 'nombre de usuario', 'password')" función. sentencias SQL a continuación, se pueden preparar para su ejecución con la "función de preparar ()" y ejecutados con la función de "ejecutar". Los resultados se realimentan después en una matriz que se puede imprimir o procesar adicionalmente.

Un script de ejemplo se vería así:

! / Usr / bin / perl -wCall la biblioteca DBI

use DBI;

Creación de variables para la información de la base de datos

$ Base de datos = "ejemplo";
$ Usuario = "mysql";
$ Password = "pass";

Conectarse a la base de datos

$ Conexion = DBI-> connect ( 'DBI: mysql: $ base de datos', $ nombre de usuario ', $ password')
o morir "Error de conexión: $ DBI :: cadena_err \ n";

Proporcionar la consulta

$ Comunicado = "SELECT * FROM dirección";

Ejecutar la consulta

$ = $ Ejecutar conectada> prepare ($ declaración);
$ Execute-> ejecutar

or die "Error: $DBI::errstr\n"; Devolver los resultados

mientras que (@row = $ Execute-> fetchrow_array) {

print "@row\n";}

$ Conectada> desconexión ();

La línea "$ conexion = DBI-> connect ( 'DBI: mysql: $ base de datos', $ nombre de usuario ', $ password')
o morir "Error de conexión: $ DBI :: cadena_err \ n"; "se utiliza para conectarse a la base de datos, sino que también proporciona la comprobación de errores para que el script no continúa funcionando si no se hace ninguna conexión también se incluye la comprobación de errores. en la ejecución de la consulta.

La función "fetchrow_array" devuelve cada fila como una matriz de valores. Los valores pueden ser accedidos por separado con las variables $ fila [1], $ fila [2], $ fila [3], etc. En este ejemplo, la fila entera se imprime en la pantalla.
La última línea de la secuencia de comandos quita la conexión de base de datos.

Si desea crear una tabla, o insertar datos en una tabla, se utiliza la función de "hacer () Para crear la tabla de la sintaxis sería.:
$ Conectada> do ( "Crear Tabla de texto (int id, VARCHAR apellido (20))");

Para insertar datos en la tabla debe agregar la función de cotización (), con el fin de citar a los valores de cadena.
$ Conectada> do ( "Insertar en valores de texto (1," $ conectada> comillas ( "James")) "..);

Administracion del sistema

El módulo DBI que permite a las funciones de administración del sistema, tales como la creación, supresión y el cierre de la base de datos.

Para crear una nueva base de datos usted debe ejecutar la siguiente línea:
$ = $ Newdb conectada> func ( «createdb», la base de datos $, 'admin');

Para eliminar una base de datos usted debe ejecutar la línea:
$ = $ Eliminar conectada> func ( "dropdb", la base de datos $, 'admin');

Para cerrar la base de datos que emitiría la línea:
$ = $ Eliminar conectada> func ( "apagado", la base de datos $, 'admin');