While Lenguaje Perl 🥇 Foros Webmasters

En el siguiente ejemplo explicamos como hacer un bucle while en Perl.
La explicación está en forma de comentarios embebida en el mismo texto.

Quote::

#!/usr/bin/perl # Inicializo la variable Contador ($cnt) $cnt = 0; # Comienzo el bucle While while ($cnt <= 7) { # Imprimo la variable y nueva linea: \n print "$cnt\n"; # Incremento el contador $cnt ++; }