Заявление Perl Redo

цикл Perl

Perl повтор заявления непосредственно к первой строке тела цикла начинают повторять этот цикл, операторы не выполняются повтор заявление, продолжайте заявление блока больше не выполняется.

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

грамматика

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

redo [LABEL]

Где LABEL не является обязательным.

повтор LABEL заявление со ссылкой модификатора указывает на управление циклом потока непосредственно к первой строке блока операторов, связанных с меткой LABEL классификаторе начал, и заявление и продолжить заявление блока не выполняется после того, как заявление журнальном;

повтор LABEL заявление без какой модификатор метка не представляет собой круговой поток управления, чтобы перейти непосредственно к первой строке текущего блока операторов начинают и продолжают выполнять инструкцию вместо заявления после заявления блока повтора;

Если вы находитесь в цикле или продолжить с блоком операторов, то для списка приращения цикла и по-прежнему блок операторов больше не будут быть выполнены;

технологическая схема

примеров

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

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

a = 0
a = 1
a = 2
a = 3
a = 4
a = 6
a = 7
a = 8
a = 9

цикл Perl