Perl continuar Statement

Perl continuar bloco é normalmente executado antes do julgamento instrução condicional novamente.

continuam declarações podem ser usados em tempo e foreach loop.

while instrução continue sintaxe é a seguinte:

while(condition){
   statement(s);
}continue{
   statement(s);
}

loop foreach continuar sintaxe da instrução é a seguinte:

foreach $a (@listA){
   statement(s);
}continue{
   statement(s);
}

continuar a usar while loop:

#/usr/bin/perl
   
$a = 0;
while($a < 3){
   print "a = $a\n";
}continue{
   $a = $a + 1;
}

O programa acima, a saída é:

a = 0
a = 1
a = 2

continuar a usar a instrução loop foreach:

#/usr/bin/perl
   
@list = (1, 2, 3, 4, 5);
foreach $a (@list){
   print "a = $a\n";
}continue{
   last if $a == 4;
}

O programa acima, a saída é:

a = 1
a = 2
a = 3
a = 4

Perl curso