Цикл until в Perl

Perl 循环Циклы Perl

Оператор until повторно выполняет оператор или группу операторов, пока заданное условие ложно.

until можно перевести как"unless"。

Синтаксис

Формат синтаксиса следующий:

until(condition)
{
   statement(s);
}

Здесь оператор(ы) может быть одним оператором или блоком операторов.

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

Блок-схема

Perl 中的 until 循环

На диаграмме,untilКлючевой момент цикла в том, что цикл может не выполниться ни разу. Когда условие истинно, тело цикла пропускается, и непосредственно выполняется следующий оператор, идущий сразу за циклом while.

Пример

#!/usr/bin/perl $a = 5; # Выполнить цикл until until( $a > 10 ){ printf "Значение a :$a\n"; $a = $a + 1; }

В программе тело цикла выполняется, когда переменная $a меньше 10, и цикл завершается, когда переменная $a больше 10.

Выполнение вышеуказанной программы даёт следующий результат:

a 的值为 : 5
a 的值为 : 6
a 的值为 : 7
a 的值为 : 8
a 的值为 : 9
a 的值为 : 10

Perl 循环Циклы Perl

Другие расширения