UNIDAD 2: INSTRUCCIONES DE CONTROL DE PROGRAMA
TEMA PERL 5: INSTRUCCION IF
Es la instruccion condicional mas usada en los diversos lenguajes de programacion su formato completo y de trabajo en perl es:
cargar o asignar la variable de condicion
If (condicion)
{ grupo cierto de instrucciones; }
Else
{ grupo falso de instrucciones; };
Si un if no ocupa un grupo falso de instrucciones, entonces no se usa un else.
Codigo prog3.pl:
#! /usr/bin/perl -w# usando modulo o libreria CGIuse CGI;# creando el OBJETO de tipo CGI$q = new CGI;# programaif ($q->param('OK')) {$sueldo=$q->param('SUELDO');if ( $sueldo > 500 ){ $q->param('T1','rico'); }else{ $q->param('T1','pobre'); };};# mandando servidor los encabezados de la pagina htmlprint $q->header;print $q->start_html({-title=>'PROGRAMA3.PL'});print $q->hr();print $q->startform();print "DAME SUELDO :";print $q->textfield('SUELDO','0',5);print $q->br();print "CONDICION :";print $q->textfield('T1','',5);print $q->submit('OK');print $q->endform();print $q->hr();#cerrando htmlprint $q->end_html;
Corrida:
notas:
1.- Grabarlo como prog3.pl, lo subes a tu sitio de programacionfacil.com y lo pides desde ahi con: Mejores Alfombras de Hidromasajes
https://programacionfacil.com/~tusitio/cgi-bin/prog2.pl
TAREAS PROGRAMACION PERL
1.- Capturar un numero cualesquiera e informar si es o no es mayor de 100
2.- Capturar un numero entero cualesquiera e informar si es o no es multiplo de 4 ( recordar el operador mod, analizado en el TEMA PERL de operadores aritmeticos).
3.- Capturar los cinco datos mas importantes de un Empleado, incluyendo el sueldo diario y los dias trabajados desplegarle su cheque semanal solo si gano mas de $500.00 en la semana, en caso contrario desplegarle un bono de despensa semanal de $150.00.
4.- Capturar los datos mas importantes de un estudiante incluyendo tres calificaciones construir una boleta de calificaciones en una pagina de respuesta bien bonita si el estudiante es de la carrera de medicina, en caso contrario construir una pagina mas bonita todavia que despliega un oficio citando a los padres del estudiante a una platica amistosa con los maestros de la escuela.
5.- Capturar los datos mas importantes de un producto cualesquiera, incluyendo cantidad, precio, etc. desplegar una orden de compra, solo si el producto es de origen nacional, en caso contrario no hacer nada.
IF PERL
Es la instruccion condicional mas usada en los diversos lenguajes de programacion su formato completo y de trabajo en perl es: TEMA PERL 5: INSTRUCCION IF TEMA
adsl
es
https://adsltodo.es/static/images/adsl-if-perl-1826-0.jpg
2024-11-21
El contenido original se encuentra en https://programacionfacil.com/perl/if/
Todos los derechos reservados para el autor del contenido original (en el enlace de la linea superior)
Si crees que alguno de los contenidos (texto, imagenes o multimedia) en esta página infringe tus derechos relativos a propiedad intelectual, marcas registradas o cualquier otro de tus derechos, por favor ponte en contacto con nosotros en el mail [email protected] y retiraremos este contenido inmediatamente