Циклы
Как известно, циклом называется управляющая конструкция для повторения действий в программе, а однократное выполнение предложений в цикле называется итерацией. В Perl существует множество различных способов задать циклическую обработку данных. Один из них - это операторы управления циклом. Если требуется повторение действий в зависимости от истинности условия, можно воспользоваться циклом while (называемый также циклом с предусловием), в котором каждый раз перед выполнением цикла проверяется условие продолжения: если оно истинно, то блок тела цикла повторяется, иначе цикл заканчивается и выполняется следующее предложение программы.
while (условие) { # проверка истинности условия продолжения # действия, выполняемые, # пока условие истинно } # продолжение программы
Например, можно воспользоваться таким циклом while для вывода на системную консоль десяти случайных чисел от 0 до 1, сгенерированных встроенной функцией rand:
$i = 0; while ($i < 10) { # повторять, пока счетчик не достиг 10 print "\n", rand; # вывести с новой строки случайное число $i++; # увеличить счетчик повторений }
Иногда удобнее для управления циклом задавать условие окончания цикла. В этом случае применяется цикл until, в котором каждый раз перед выполнением тела цикла проверяется условие окончания повторений: если оно истинно, цикл заканчивается и выполняется следующее предложение программы, а если условие ложно, то блок тела цикла выполняется еще раз.
until (условие) { # проверка истинности условия окончания # действия, выполняемые, # пока условие ложно } # продолжение программы
Предыдущий пример вывода случайных чисел можно переписать с использованием цикла until:
$i = 0; until ($i == 10) { # закончить, когда счетчик достигнет 10 print "\n", rand; # вывести с новой строки случайное число $i++; # увеличить счетчик повторений }
Другая управляющая конструкция - цикл for также применяется для повторения действий с проверкой условия продолжения. Но в нем предусмотрены два дополнительных выражения для управления циклом. Первое из них выполняется один раз перед выполнением цикла, и в нем обычно выполняются начальные действия, такие как инициализация переменных. Второе выражение выполняется каждый раз после выполнения тела цикла и перед проверкой условия продолжения работы цикла. Структура этого цикла выглядит так:
for ( первое выражение; условие; второе выражение) { # действия, выполняемые, # пока условие истинно } # продолжение программы
В заголовке цикла могут отсутствовать одно или оба выражения, а в случае отсутствия условия оно считается истинным. Однако при этом должны оставаться две точки с запятой, разделяющие выражения. Снова перепишем приведенный выше пример, на этот раз используя цикл for:
for ($i=0; $i<10; $i++) { # повторить 10 раз, увеличивая $i print "\n", rand; # вывести с новой строки случайное число }
Еще один тип цикла предназначен для перебора всех элементов списка, для чего каждый его элемент последовательно помещается в указанную переменную. Это цикл foreach:
foreach переменная (список) { # # работа с переменной, содержащей # текущий элемент обрабатываемого списка }
Примеры использования цикла foreach будут приведены в лекции лекции 5, посвященной спискам. В ней будет рассмотрено еще несколько конструкций, также выполняющих повторение действий.
