UNIDAD 4: PROCEDIMIENTOS Y FUNCIONES

TEMA PERL 1 : PROCEDIMIENTOS

Un camino para dividir un gran programa en partes mas pequenas es el uso de los llamados procedimientos.

Un procedimiento es un grupo de instrucciones, variables, constantes; etc, que estan disenados con un proposito particular y tiene su nombre propio.

Es decir un procedimiento es un modulo de un programa que realiza TAREAS especificas y que no puede regresar valores al programa principal u a otro procedimiento que lo este invocando.

Despues de escribir un procedimiento se usara su propio nombre como una sola instruccion o llamada al procedimiento.

Los procedimientos se podran escribir despues del cuerpo principal del programa utilizando el formato:

Sub NomProc{instrucciones;};

Un programa puede tener tantos procedimientos como se deseen para hacer una llamada o invocacion al procedimiento durante la ejecucion de un programa se debera escribir el nombre del procedimiento precedido del simbolo (&).

Prog14.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();

# llamando o activando un procedimiento

&proc1;

print "EDAD : ";

print $q->textfield('EDAD','',5);

print $q->br();

print "MESES : ";

print $q->textfield('MESES','',5);

print $q->submit('OK');

print $q->endform();

print $q->hr();

#cerrando html

print $q->end_html;

sub proc1

{

$meses = $q->param('EDAD') * 12;

$q->param('MESES', $meses);

};

Corrida:

Como se observa un procedimiento puede ser un programa completo.

Problemas programacion perl

Una forma llama un programa y le pasa una opcion el programa con ifs llama el procedimiento apropiado las opciones para la forma son:

Menu.

a) Convertir $800.00 Pesos a dolares.

b) Calcular el Area de un triangulo de base=20 y altura=30.

c) Deplegar una Boleta de calificaciones.

d) Fin de menu.