¡Ya estamos en Twitter!

Perl en Español

  1. Home
  2. Tutoriales
  3. Foro
  4. Artículos
  5. Donativos
  6. Publicidad

Enunciados Modificados

por Uriel Lizama

Introducción

Los enunciados modificados básicamente es la unión de una expresión con una palabra para realizar una acción.

Las palabras o modificadores que se pueden usar son: if,unless,until y while.

La sintáxis de cualquiera de estos enunciados es:

EXPRESIÓN modificador CONDICIÓN

Modificador if

El modificador if le dice a Perl que cierta expresión debe de evaluarse solamente si se cumple con cierta condicional.

Sintáxis:

EXPRESIÓN if CONDICIONAL;

Como podrán ver, este enunciado es una forma pequeña de decir:

if(CONDICIONAL){
EXPRESIÓN
}

Ejemplo:

Veamos el siguiente código:

my $nombre = "Uriel";

print "Eres el administrador" if $nombre eq "Uriel";

Aquí nuestra expresión es el print, el cual será ejecutado solo si la variable $nombre es Uriel, siendo esta parte la condicional.

Modificador unless

Este modificador es el opuesto del if. Le dice a Perl que evalúe cierta expresión solamente si la condicional NO es verdadera.

Sintáxis:

EXPRESIÓN unless CONDICIONAL;

Esta es la forma más pequeña de decir:

if(!CONDICIONAL){
EXPRESIÓN
}

Ejemplo:

my $var = 1;

print "Falso" unless $var;

Como ven, aquí no va a imprimir nada, porque como la variable $var es verdadera el enunciado no es evaluado.

Modificador until

Este modificador lo que hace es decirle a Perl que evalúe una expresión hasta que la condicional sea verdadera.

Sintáxis:

EXPRESIÓN until CONDICIONAL;

Esta es la forma pequeña de decir:

until(CONDICIÓN){
EXPRESIÓN
}

Ejemplo:

Veamos el siguiente código:

my $num = 1;

$num++ until $num > 10;

print "$num";

¿Qué crees que imprima? Si dijiste que 11, estás en lo correcto. Esto se debe a que Perl ejecutará la expresión de incremento hasta que la variable sea mayor al número 10. Así que cuando llega a 11 Perl ve que la condicional se cumple y deja de evalúar la expresión.

Modificador while

Este modificador es un poco diferente al until, pues este modificador evalúa la expresión mientras la condicional sea verdadera.

Sintáxis:

EXPRESIÓN while CONDICIONAL;

Esta es la forma pequeña de decir:

while(CONDICIÓN){
EXPRESIÓN
}

Ejemplo:

my $num = 1;

$num++ while $num < 10;

print "$num";

De nuevo ¿qué crees que imprima?. Si dijiste 10 nuevamente estas en lo cierto. Perl sigue evaluando la expresión hasta que la condicional sea falsa. Por eso cuando llega a 10 al no ser menor que 10 ya no evalúa nuevamente la expresión.

¿Quiéres más tutoriales como este? Escribir tutoriales toma una gran cantidad de tiempo y esfuerzo. Si este tutorial te ayudó a aprender o a solucionar algo, por favor considera dejar alguna donación en apoyo a Perl en Español.

Cliquea en el botón de abajo para dejar tu donación por medio de PayPal.

Comparte:
Categorías de Tutoriales:
En Nuestros Foros:

    Software error:

    junk after document element at line 1, column 32, byte 32 at /usr/lib64/perl5/vendor_perl/XML/Parser.pm line 187.
    

    For help, please send mail to the webmaster ([email protected]), giving this error message and the time and date of the error.

  • Entra a los foros »
Socializa:
Síguenos por Twitter

Suscríbete GRATUITAMENTE al Boletín de Perl en Español

Perl en Español es mantenido con Movable Type
Todo el contenido de Perl en Español está bajo una licencia CC:
Creative Commons License