Uso de loops en Perl

Introducción:

En este tutorial les mostrare como crear loops para sus programas. Cubriré el uso de lo siguiente:

• - while
• - until
• - for
• - foreach

Loops

Los loops son una gran pieza de programación. El loop en sus varias maneras te permite correr un pedazo de codigo varias veces hasta que una cierta condición es alcanzada y entonces el loop para.

Nota: Cuando crees loops asegurate de que haya algo que frene al loop, o si no contunaría indefinidamente.

Los loops pueden ser usados de varias formas, por ejemplo cuando se combinan con expresiones regulares, puedes buscar algo en una lista haciendo que el loop búsque en cada elemento de la lista, y si es verdadera nuestra expresión entonces terminar ahí el loop.

WHILE

El comando "while" correra repetidamente un pedazo de codigo mientras su expresión condicional sea verdadera.

Su sintaxis es como la siguiente:

while(condicion){
bloque de codigo
}

Por ejemplo si quisieras asegurarte que una variable tuviera un cierto tamaño, podrías agrandarla de la siguiente manera:

while (lenght($valor) < 10){
$valor = "0$valor";
}

Esto agregaría un 0 a la variable hasta que su largo no sea mas de 10 digitos.

UNTIL

Este es básicamente similiar al loop de while. Ejecutará un bloque de código hasta que la expresión condicional se haga verdadera.

Tiene la misma sintaxis que el loop de while y puede ser usado de la misma manera. Por ejemplo este código hará lo mismo que el visto anteriormente:

until (length($valor) = 10){
$valor = "0$valor";
}

Estos dos loops tienen un bloque extra al final llamado "continue". Este bloque será ejecutado antes de que el loop inicié aún cuando en el bloque principal se salte (que puedes lograr con el comando "next").

Por ejemplo:

$i = 1;
while ($i < 10){
#bloque de codigo
}
continue{
$i++;
}

Esto correra por el bloque de codigo 10 veces antes de salir.

Usuarios que han visto este tema también han visto...

- Variables y estructura de los datos en Perl
- PostgreSQL con perl en el WEB
- Variables de Entorno
- Contador de visitas con Perl
- Utilizando FormMail

- Versión imprimible de este documento
- Enviar por e-mail este documento