Extensiones ODBC para Perl-Win32

Introducción
Características y Funciones
Acceso a escritos Perl
Arquitectura
Requerimientos del Sistema
Compatibilidad
Disponibilidad
Contactos

Introducción

Perl es el lenguaje más ampliamente usado en la programación CGI en el World Wide Web, ya que ofrece una serie de ventajas que lo hacen ideal para construir interfaces entre el Web y otras aplicaciones. Algunas de las ventajas que Perl ofrece son:

Portabilidad de código en diversas plataformas.
Existencia de operadores extremadamente robustos para manipular cadenas de caracteres, así como funciones para tratar con datos binarios.
Métodos simples para la construcción y manipulación de objetos definidos por el usuario.
Ejecución de programas en base a interpretación.
Facilidad para invocar comandos y funciones shell del sistema operativo.
Habilidad para acceder variables de entorno.
Existencia de numerosas extensiones o módulos para interactuar con otro tipo de programas, como bases de datos.

A partir de estas y otras ventajas que Perl ofrece, así como también de la existencia de extensiones para ODBC de 32 bit, es posible construir aplicaciones que permitan acceder diversas bases de datos a través del Web.

Estas extensiones fueron desarrolladas por Dave Roth, y posibilitan que un escrito Perl haga uso de una serie de funciones para comunicarse con una base de datos. Las extensiones de Roth permiten que un escrito Perl acceda una base de datos a través de sentencias SQL. Estas extensiones funcionan únicamente para la versión Perl de 32 bits y que trabajan solo con aquellas bases de datos que posean manejador (driver) ODBC de 32 bit.

Características y Funciones

Por lo general, un programa CGI se invoca desde el atributo ACTION de un formulario. Este programa tiene por objetivo generar información dinámica a partir de los criterios especificados por el usuario en los campos del formulario.

Como ya se dijo, Perl posee todas las características para actuar como CGI entre el Web y una base de datos. En particular para plataformas Windows de 32 bit, Perl puede cumplir con esta tarea efectivamente ya que existen una serie de extensiones que permiten establecer conexiones con diversos tipos de bases de datos vía ODBC. Estas extensiones permiten incrustar sentencias SQL en un escrito Perl a través de las cuales serán enviadas a la base de datos. Las principales funciones que las extensiones ODBC ofrecen a un escrito Perl son:

new(): Crea una instancia del objeto que establece conexión con una base de datos.
sql(): Envía sentencias SQL a la base de datos, vía ODBC.
fieldnames(): Genera los nombres de los campos obtenidos a partir de una sentencia SELECT.
fetchrow(): Recupera hacia el buffer, una fila del conjunto de resultados obtenidos por una sentencia SELECT.
data(): De cada fila de resultados , se obtienen los respectivos campos seleccionados.
error(): Si existe algún error en las llamadas a las anteriores funciones , informa del tipo del error.

Para usar las extensiones ODBC de Perl-Win32, en un escrito que actúe como CGI deben incluirse:

Llamada a módulo ODBC al principio de escrito Perl.
Descodificar entrada proveniente del formulario.
Imprimir Tipo de Contenido a desplegar en el Browser (Texto ó HTML).
Crear una instancia para cada base de datos con la que se desea establecer comunicación.
Construir dinámicamente sentencia SQL, en base a los datos ingresados por el usuario.
Ejecución de sentencia SQL.
Si la sentencia SQL es un SELECT deben manipularse los datos provenientes de la base de datos, para luego desplegarse al usuario en el formato adecuado.

Acceso a escritos Perl

Los archivos Perl que hagan uso de las extensiones para ODBC deben poseer extensión .pl; y se invocan como cualquier escrito CGI:

http://<servidor_web>/<dir-cgi>/<aplicacion>.pl

<servidor_web>: Es la dirección IP o alias del servidor Web.

<dir-cgi>: Ruta del directorio de escritos CGI del servidor Web.

<aplicacion>.pl: Escrito Perl que hace uso de Extensiones ODBC.

Para ilustrar, supóngase que se tiene un formulario para inscribirse a un grupo de discusión sobre Perl:

<HTML>

<BODY>

<H1>Inscribase a Perl !</H1>

<P>Nombre:<INPUT NAME= "nombre" SIZE = "30">

<P>Email:<INPUT NAME= "email " SIZE = "30">

</FORM>

</BODY>

</HTML>

El correspondiente escrito Perl, agregará el usuario especificado a una base de datos cuyo ODBC es "Miembros":

#agregar.pl

#Programa que agrega registros a una

#base de datos Perl

use Win32::ODBC;

use CGI_Lite;

$cgi = new CGI_Lite();

%results = $cgi->parse_form_data();

print "Content-type : text/plain \n\n";

$query = new Win32::ODBC("DSN = Miembros ;");

$query->sql("INSERT INTO GruPerl VALUES(‘$results{‘nombre’}’, ‘results{‘email’}’)");

if ( $query->error){

print $query->error, "\n";

exit();

}

else{

print "Se inscribió a $results{‘nombre’} ";

}

En el ejemplo anterior con la sentencia use se cargan tanto el módulo de extensiones ODBC como el de descodificación de datos del formulario. Las siguientes dos líneas descodifican la información proveniente del formulario en campos del arreglo results. Para que posteriormente se envíe la sentencia SQL hacia la tabla GruPerl, que pertenece a la base de datos que tiene por ODBC Miembros. Finalmente, se envía al servidor Web el mensaje indicador del éxito o fracaso de la inserción.

Arquitectura

Las extensiones ODBC deben ser llamadas desde un escrito Perl que pueda comportarse como aplicación CGI 1.1. Tales extensiones permiten que desde un escrito Perl se pueda establecer comunicación con una base de datos a través de ODBC; lo cual implica que los criterios que un usuario ha especificado en un formulario se procesen y se conviertan en sentencias SQL, para que el ODBC las intérprete y sean enviadas a la base de datos, con el objetivo de obtener los resultados esperados de la misma.

Este procedimiento se ilustra en la Fig. 10.

Figura 10. Arquitectura de Extensiones ODBC para Perl Win-32.

Las extensiones ODBC para Perl constan de dos archivos :

ODBC.PLL: Es la extensión Perl para ODBC, escrita y compilada en Lenguaje C. Un archivo con extensiones .PLL no es más que un .DLL, que será cargado dinámicamente por Perl cada vez que se requieran los módulos o extensiones dentro de un escrito Perl.
ODBC.PM : Archivo que provee al programador de una interfaz sencilla para hacer uso de las funciones contenidas en ODBC.PLL.

Requerimientos del Sistema

Procesador Intel 486 o superior.
1 MB libre en disco duro.
16 MB en memoria RAM(mínimo).
Servidor Web Compatible con CGI 1.1
Base de Datos compatible con ODBC.
Compilador Perl Win-32 versión 5.001m (Revisión 106-110) o superior.
Manejador(Driver) ODBC de 32 Bit para la base de datos.

Compatibilidad

Sistemas Operativos

Windows NT Server ver 3.51 ó 4.0 para arquitecturas Intel
Windows 95

Bases de Datos

Todas aquellas para las cuales existan ODBC de 32 bit, es decir: Microsoft SQL Server, Microsoft Access, Oracle, Sybase, FoxPro, etc.

Servidor Web

Todo Servidor Web que soporte CGI 1.1: Microsoft IIS 1.0 o superior, O’Reilly & Asocciates WebSite, Emwacs, etc.

Disponibilidad

Las extensiones ODBC para Perl Win-32, se ofrecen gratuitamente en el sitio ftp://ftp.roth.net/pub/ntperl .

La página principal de estas extensiones es http://www.roth.net/ODBC, en donde se encontrará toda la información relativa a éstas.

El paquete de distribución incluye:

Archivos ODBC.PM y ODBC.PLL
Ejemplos
Documentación
Bases de Datos de prueba y sus correspondientes ODBC

Contactos

Dave Roth

Web: http://www.roth.net/ODBC

ftp: ftp://ftp.roth.net/pub/ntperl

email: rothd@roth.net

Nombre

Extensiones ODBC para Perl Win-32
DBMS	Bases de Datos Compatibles con ODBC
Sistema Operativo	Windows NT Server 3.51/4.0 para arquitecturas Intel. Windows 95
Disponibilidad	Paquete de distribución gratuita ofrecido por Dave Roth en ftp://ftp.roth.net/pub/ntperl
Arquitectura	CGI 1.1 que se ejecuta en base a interpretación, estableciendo conexión con una base de datos vía ODBC.
Características	Módulos que amplían ventajas de Perl, que posibilitan comunicarse con una base de datos a través de ODBC. Establece comunicación con una base de datos mediante sentencias SQL. La interfaz debe desarrollarse en base a una programación previa. Se ejecuta únicamente sobre Sistemas Operativos Windows de 32 bit.

Fuente de Información: http://www.roth.net/ODBC/