UNIDAD 3: ARREGLOS

TEMA PERL 5: PROCESOS ESPECIALES

Perl es un lenguaje de programacion que esta muy enfocado al tratamiento de texto en este sentido presenta muchas utilerias o mas propiamente funciones que facilitan el trabajo con listas.

Entre dichas funciones se encuentran:

Join:- Convierte un arreglo en un escalar ej; @alfa('a'..'z'); y $a=join”:”, hace que $alfa quede cargada con “a:b:c:d:e:f:etc”

Split:- Convierte un escalar en un arreglo, ejemplo $alfa='mama:papa:hijo:hija'; y luego @beta=split/:/,$alfa; hace que @beta quede cargada con ('mama','papa','hijo','hija').

Shift:- Regresa y tambien elimina el primer elemento de un arreglo.

Pop:- Regresa y tambien elimina el ultimo elemento de un arreglo.

Unshift:- Inserta un elemento al principio del arreglo.

Push:- Inserta un elemento al final de un arreglo.

Splice:- Permite extraer un subarreglo del arreglo y reacomodar el arreglo original.

Sort:- Ordena los elementos de una lista como lo muestra el siguiente programa ejemplo.

Prog12.pl

#! /usr/bin/perl -w
# usando modulo o libreria CGI
use CGI;
# creando el OBJETO de tipo CGI
$q = new CGI;
# mandando servidor los encabezados de la pagina html
$resp = '';
print $q->header;
print $q->start_html();
print $q->hr();
print $q->startform();
# creando y cargando
@edad=(18, 10, 12, 20, 15, 15, 17);
# ordenando
@temp = sort @edad;
#desplegando original
for($reng=0;$reng <= 6 ;$reng++)
{ print "edad= $edad[$reng]" . '<br>'; };
# desplegando ordenado
print "edades ordenadas= @temp" ;
print $q->submit('OK');
print $q->endform();
print $q->hr();
#cerrando html
print $q->end_html;

Recordar que un programa que no ocupa modificar controles visuales puede quedar incorporado directamente dentro de la forma, el programa esta muy claro para mi J .

corrida:

image252.jpg

TAREAS PROGRAMACION PERL :

Construir un programa que use las funciones , shift, unshift, push y pop( y sinceramente espero que el semestre que lleven estructuras de datos se acuerden de esta tarea).

Politica de Privacidad