UNIDAD 3: ARREGLOS

TEMA PERL 4: LISTAS(2)

Recordar que los datos que alimentan un programa siempre provienen de un control o componente (INPUT TYPE=?) de la forma de momento solo se podra capturar elementos la siguiente manera:

Prog11.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();
print $q->b("EDAD 1 :");
print $q->textfield('ED1', '', 5);
print $q->br();
print $q->b("EDAD 2 :");
print $q->textfield('ED2', '', 5);
print $q->br();
print $q->b("EDAD 3 :");
print $q->textfield('ED3', '', 5);
print $q->br();
print $q->submit('OK');
print $q->endform();
print $q->hr();
#cerrando html
print $q->end_html;
# programa
if ($q->param('OK')){
# capturando
$edad[0] = $q->param('ED1');
$edad[1] = $q->param('ED2');
$edad[2] = $q->param('ED3');
# procesando
for($reng=0; $reng <= 2; $reng++)
{ $edad[$reng]= $edad[$reng] * 12; };
#desplegando
for($reng=0;$reng<=2;$reng++)
{ print "edad= $edad[$reng]" . '<br>'; };
# tambien se puede usar el @ y observar que no se ocupa for
print "[email protected]" ;
};

Corrida:

image251.jpg

notas:

Captura observar que es uno a uno y con simbolo $.

Recordar que el primer renglon o indice en perl es el renglon 0.

Siempre que se use un elemento de una lista en perl con cualquier proceso (captura, despliegue, operaciones) debera acompanarse de su indice respectivo.

Para procesar (hacer operaciones con ellos o comparaciones, etc) los elementos de la lista se debera usar un ciclo for con una variable de control llamada renglon misma que se usara tambien como indice de la lista.

Para desplegar los elementos de la lista tambien se usa un ciclo for con su variable de control renglon tal como se muestra en el ejemplo.

El mismo ciclo de proceso o despliegue se puede utilizar para procesar o desplegar los elementos de mas de una lista siempre y cuando las listas sean del mismo tamano.

Recordar que listas en perl, pueden estar compuestas de elementos de diverso tipo de dato.

Observar que el simbolo @ (arroba) se usa para manipular la lista completa a la vez.

TAREAS PROGRAMACION PERL

1.- Capturar y desplegar 5 precios de productos cualesquiera.

2.- Capturar 4 sueldos en su pagina y desplegarlos aumentados en un 25%

3.- Capturar una lista que contenga todos los datos de un alumno (de cualquier tipo) aumentarle 3 anos a sus edad despues y desplegar todo.

Politica de Privacidad