PDF de programación - tutorial de Perl

Tutorial de PERL

Juan Julián Merelo Guervós [email protected]



Tutorial dividido en
capítulos.
Descargar el tutorial
completo, en .zip y el
tutorial completo, en
.tgz. También los
ejemplos

1. ¿Qué es?
2. ¿Para qué sirve?
3. ¿Cómo se usa?
4. Mi primer programa en PERL
5. Más difícil todavía
6. Dando vueltas sobre lo mismo
7. Ahorrando energías
8. Recordando, que es gerundio
9. Purgando los pecados.

10. Pero ya puestos...
11. Regularizando la situación
12. Presentando lo impresentable
13. Decodificando
14. Todo bajo control
15. Algunos consejos
16. Preguntas frecuentemente preguntadas
17. Bibliografía.
18. Recursos Internet
Notas

1 ¿Qué es?

PERL significa Practical Extraction and Report Language, algo así como lenguaje práctico de
extracción y de informes. Es un lenguaje creado por Larry Wall (quien, por cierto, es uno de los
net.gods más conocidos en la actualidad) con el objetivo principal de simplificar las tareas de
administración de un sistema UNIX; en realidad hoy en día (en su versión 5.005, y posiblemente pronto,
la 5.6) se ha convertido en un lenguaje de propósito general, y una de las principales herramientas de un
buen internetero y de un buen webmaster.

Larry Wall es el tipo de personas que han hecho de la Internet lo que es ahora: un lugar con libre
intercambio de ideas, donde los que saben de algo, los gurus, ayudan al que no sabe. Larry
([email protected]) es un habitual del grupo de usenet comp.lang.perl, y es normal que el propio Larry
conteste a una pregunta de un principiante o a un error con un parche para solucionarlo.

Es un lenguaje que hereda estructuras principalmente de los intérpretes de comandos de UNIX,
especialmente elcsh, y de otras utilidades estándar, comoawk ysed. En realidad, puede hacer todo lo que
hacen cualquiera de ellos y todos ellos juntos, y la mayoría de las veces de forma más simple,
comprensible y fácil de depurar. Si alguna vez habeis tratado de escribir un script para el shell, sabéis lo
que quiero decir.

PERL es un lenguaje interpretado, aunque en realidad, el intérprete de PERL, como todos los
intérpretes modernos, compila los programas antes de ejecutarlos. Por eso se habla de scripts, y no de
programas, concepto referido principalmente a programas compilados al lenguaje máquina nativo del
ordenador y sistema operativo en el que se ejecuta.

El mejor libro de referencia
sobre el PERL es Programming
Perl, por Larry Wall y otros
(llamado el libro del camello por
razones obvias). Aparte de la
referencia, vienen ejemplos,
reglas de estilo, y es bastante
divertido.

A pesar de que la versión actual del intérprete de PERL es la 5, es
muy habitual, sin embargo, encontrar la versión 4.036, el último
patchlevel de la versión 4 y probablemente el más estable.
Actualmente, en enero del 2000, la versión 5.005 es suficientemente
estable como para usarla en cualquier plataforma. La versión 5 es
prácticamente compatible 100% con la 4; virtualmente todos los
scripts que funcionan para la versión 4 lo hacen también en la 5. La
mayor parte de los scripts presentados en este tutorial están
desarrollados para la versión 4, pero deberían de funcionar, en
principio, para la versión 5. Cuando son para la versión 5 de PERL,
se indicará explícitamente con este signo v5.

Aunque desarrollado originalmente en un entorno UNIX, actualmente
hay versiones para casi todos los sistemas operativos: DOS (por
ejemplo, la última versión, OpenDOS) Windows NT, Amiga, MacOS
(ver Bibliografía/Recursos.). Los scripts son compatibles entre las
diversas plataformas, de forma que es un verdadero lenguaje
multiplataforma. Muchos fabricantes lo incluyen en sus versiones de
UNIX; también el Linux lo incluye. Si quieres saber si está en tu
UNIX, escribe simplemente

UNIX% which perl
/usr/local/bin/perl

y si contesta algo similar a lo anterior, es que está instalado en el sistema. En algún otro "sistema
operativo", como Windows 95, acuérdate de si lo instalaste o no, debe de estar en algún lado en tu disco
duro. Para bajarte la última versión, consultar el apartado de enlaces



2 ¿Para qué sirve?

Prácticamente, sirve para todo. Todas las tareas de administración de UNIX se pueden simplificar con
un programa en PERL. Se usa también para tratamiento y generación de ficheros de texto. También hay
proyectos completos y complejos escritos en PERL, pero son los menos.

La forma del lenguaje facilita la programación rápida y sucia, el hacer un programa rápido para que
funcione. Esto hace también que se utilice para hacer prototipos rápidos de algún algoritmo que
queremos ver funcionar antes que tomarnos la molestia de programarlo en un lenguaje más eficiente,
como el c++. Y últimamente ha encontrado su aplicación en la escritura de CGI (common gateway
interface), o scripts ejecutados desde páginas de la World Wide Web. La mayoría de los programas que
se encuentra uno para procesar formularios en la Internet llevan la extensión .pl, lo cual denota que
están escritos en PERL.

En general, los programas en PERL se ejecutan en el servidor, como todos los programas CGI, a
diferencia de otros programas ejecutados por el cliente (generalmente un navegador como el Internet
Explorer de Microchof o el Navigator), como aquellos escritos en JavaScript o Java. Existen además

extensiones al Apache que permiten ejecutar directamente programas en PERL desde el servidor de
HTTP.

Mediante una serie de módulos adicionales, tales como el DBD o el ODBC, PERL puede servir para
acceder a bases de datos, desde BD gratuitas como MySQL hasta el Microsoft SQL server usando
ODBC. Por supuesto, esto se puede combinar con un CGI para hacer aplicaciones tales como un carrito
de la compra para un sitio web. Pero esto se deja como ejercicio para el lector.

3 ¿Cómo se usa?

Cómo conseguir e instalar programas en PERL

Primero, hay que bajarse e instalar alguna versión de PERL. Hay versiones para casi todos los sisetemas
operativos, o sea que no debería de ser complicado. Es conveniente consultar la sección de enlaces, para
ver dónde podemos conseguirlo.

En todo caso, lo más probable es que si tienes una distribución de Linux más o menos decente, tal como
RedHat , SuSE o Debian, venga ya incluido. Consulta los paquetes que tienes instalados (usando la
herramienta correspondiente) o simplemente escribe:

bash$ which perl
/usr/bin/perl

Si contesta algo así como lo anterior, es que está instalado.

En Windows, como siempre, es otro cantar. Sin embargo, hay una excelente versión de PERL para
Windows, de la empresa ActiveState. No hay más que bajárselo, pulsar en el icono de SetUp
correspondiente, y se lanza un procedimiento de instalación similar al de todos los programas. Desde ese
momento, ya se puede usar desde la línea de comandos.

En MSDOS, basta descomprimirlo, y añadir al PATH el directorio donde se encuentra perl.exe.

En otros sistemas operativos, puede que no exista una versión binaria. Habrá que bajarse los fuentes de
alguno de los sitios web existentes, y luego compilarlos usando los siguientes comandos (si es que es un
SO parecido a UNIX:

sh Configure
make
make test
make install

Para más información, consultar el fichero INSTALL o perldoc INSTALL que viene con los fuentes
(malamente podrás usar perldoc si no tienes instalado PERL, pero en fin...).

4 Mi primer programa en PERL

Escribir el archiconocido "Hola" en PERL no puede ser más fácil:

print "Passa, tio\n";

Y eso es todo. No hay necesidad de abrir el programa, ni de cerrarlo, ni de incluir librerías estándar o no,
ni nada de nada. Solamente hay que tener cuidado de terminar todas las sentencias con;. \n, que se
suele leer "escape-N", tiene el mismo significado que en C; es decir, un retorno de carro(1).

Ejecutarlo es otro cantar; o mejor dicho, muchos cantares, una cantata entera. El PERL siempre Hay
Muchas Formas de Hacer Las CosasTM. Al menos tres, en este caso.

1. Guarda el programa en un fichero, llamémoslo passa.pl. Se puede ejecutar con

C:\PROGS\PERL>perl passa.pl
Passa, tio

Todo esto suponiendo que PERL esté en el PATH de ejecución, claro está.

2. Pasa de guardar el programa en un fichero y ejecútalo directamente. Se le da el switch-e al
intérprete para indicar que se debe ejecutar el script que viene a continuación (y ojo con las
comillas)

C:\PROGS\PERL>perl -e ’print "Passa, tio\n";’
Passa, tio

3. Si estás en UNIX, se utiliza una sintaxis similar a los scripts del intérprete de comandos, es decir,

guardar el fichero con una primera línea que indica dónde está el intérprete que va a ejecutar el
resto del fichero. En el caso del PERL, puede ser algo como #!/usr/local/bin/perl, o
#!/usr/bin/perl en RedHat Linux, por ejemplo) (los símbolos iniciales se suelen denominar
pound-bang, o almohadilla-admiración, en román paladino). En todo caso, habrá que sustituirlo
por el camino completo donde habita el intérprete de PERL (si no se sabe, recurre al comando de
UNIXwhich (como hemos visto antes), o, por último, al operador de tu sistema; ahora, que si tú
mismo eres el operador de tu sistema y no sabes como hacerlo, tienes un problema, tío... Bueno,
siempre te queda la internet). Tras salvar el fichero, habrá que dar la orden

UNIX% chmod +x passa.pl

para convertirlo en ejecutable; hecho eso, se puede ejecutar directamente escribiendo

UNIX% passa.pl
Passa, tio

4.

4.

En Windows y familia, hay al menos dos formas de hacerloTM(suponiendo, claro está, que le pille
de buenas y te deje hacer algo). Tras instalar la versión de PERL para WinXX de la Internet, de la
empresa ActiveWare, se crea un acceso directo a perl.exe y se copia al directorio
\Windows\SendTo; esto hará que aparezca PERL dentro del menú enviar a, que es una de las
opciones del menú que surge al pulsar con el botón derecho del ratón.
Otra forma es más específica para ficheros de tipo .pl, y es el mismo mecanismo que se usa para
asignar iconos y programas ejecutables a los ficheros no ejecutables: en la carpeta MiPC, pasar a
Ver - Opciones y pulsar sobre la pestaña Tipos de Arch