PERLSCRIPT UNIDAD 4: PROCEDIMIENTOS Y FUNCIONES
TEMA 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 PROGRAMACION PERLSCRIPT 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 (&).
Prog11.html
<HTML> <H1>BIENVENIDO A PERL </H1> <FORM ACTION=HTTP://PROGRAMACIONFACIL.COM:4080/tusitio/PROG11.ASP METHOD=POST> EDAD..:<INPUT TYPE=TEXT NAME=EDAD><BR> <INPUT TYPE=SUBMIT VALUE=OK> </FORM> </HTML>
Corrida prog11.html
Codigo prog11.asp
<% @LANGUAGE = PerlScript %>
<HTML> <H1>ASP CON PERLSCRIPT</H1>
<%
# llamando procedimiento
&proc1;
%>
<%
sub proc1
{
$edad=$Request->Form('EDAD')->item;
$edad=$edad * 12;
$Response->Write("meses = $edad"); };
%>
</HTML>
Como se observa un procedimiento puede ser un programa completo.
Corrida prog11.asp
Problemas programacion perl script
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.