Perl продолжить заявление

Perl продолжают блок, как правило, выполняется перед судом условного оператора снова.

продолжают заявления могут быть использованы в то время как и цикл по каждому элементу.

в то время как цикл продолжают заявление синтаксис выглядит следующим образом:

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

Цикл Еогеасп продолжить синтаксис заявление выглядит следующим образом:

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

продолжать использовать в то время как оператора цикла:

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

Вышеприведенная программа, выход:

a = 0
a = 1
a = 2

продолжать использовать оператор цикла Еогеасп:

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

Вышеприведенная программа, выход:

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

Perl курс