Perl até Loop

A until A instrução de loop na linguagem de programação Perl executa repetidamente uma instrução de destino, desde que uma determinada condição seja falsa.

Sintaxe

A sintaxe de um until loop na linguagem de programação Perl é -

until(condition) {
   statement(s);
}

Aqui statement(s)pode ser uma única instrução ou um bloco de instruções. oconditionpode ser qualquer expressão. O loop itera até que a condição se torne verdadeira. Quando a condição se torna verdadeira, o controle do programa passa para a linha imediatamente após o loop.

O número 0, as strings '0' e "", a lista vazia () e undef são todos false em um contexto booleano e todos os outros valores são true. Negação de um valor verdadeiro por! ou not retorna um valor falso especial.

Diagrama de fluxo

Aqui, o ponto-chave do loop until é que o loop pode nunca ser executado. Quando a condição é testada e o resultado é verdadeiro, o corpo do loop será ignorado e a primeira instrução após o loop until será executada.

Exemplo

#!/usr/local/bin/perl
 
$a = 5;

# until loop execution
until( $a > 10 ) {
   printf "Value of a: $a\n";
   $a = $a + 1;
}

Aqui, estamos usando o operador de comparação> para comparar o valor da variável $ a com 10. Portanto, até que o valor de $ a seja menor que 10, untilo loop continua executando um bloco de código próximo a ele e assim que o valor de $ a torna-se maior que 10, ele sai. Quando executado, o código acima produz o seguinte resultado -

Value of a: 5
Value of a: 6
Value of a: 7
Value of a: 8
Value of a: 9
Value of a: 10