Declaração de continuação do Perl

UMA continueBLOCK, é sempre executado um pouco antes de a condicional estar prestes a ser avaliada novamente. Uma instrução continue pode ser usada com loops while e foreach . Uma instrução continue também pode ser usada sozinha com um BLOCO de código, caso em que será assumida como uma instrução de controle de fluxo em vez de uma função.

Sintaxe

A sintaxe para um continue declaração com while loop é o seguinte -

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

A sintaxe para um continue declaração com foreach loop é o seguinte -

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

A sintaxe para um continue instrução com um bloco de código é a seguinte -

continue {
   statement(s);
}

Exemplo

O programa a seguir simula um for loop usando um while loop -

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

Isso produziria o seguinte resultado -

Value of a = 0
Value of a = 1
Value of a = 2

O programa a seguir mostra o uso de continue declaração com foreach loop -

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

Isso produziria o seguinte resultado -

Value of a = 1
Value of a = 2
Value of a = 3
Value of a = 4