Предложение выполняется если
EXPRвозвращает true.
Пример:
$var = 1;
$var2 = 3 if $var > 0; # Результат: $var2 = 3
whileEXPR – Модификатор «пока». Предложение выполняется столько раз пока
EXPR= true
Пример:
$var = 1;
print $var++ while $var < 5; #
Печать $var с инкрементом
Результат: 1234

untilEXPR – Модификатор "до ". Предложение выполняется до тех пор пока
EXPR = false
Пример:
$var = 1;
print $var++ until $var > 5;# Печать $var с инкрементом
Результат: 12345
unlessEXPR– Модификатор «если не» . Обратный к
if. Выражение выполняется есле
EXPR = false.
Пример:
$var = 1;
print $var++ unless $var > 5;# Печать $var с инкрементом
Результат: 1

Сложные предложения.
Последовательность простых предложений ограниченная функциональными ограничителями называется блоком. В Перл это может быть целый файл, последовательность предложений в операторе
eval{}или чаще всего это множество простых предложений ограниченных круглыми скобками '
{}'.
Сужествуют следующие виды сложных предложений:
if (EXPR) BLOCK
if (EXPR) BLOCK else BLOCK
if (EXPR) BLOCK elsif (EXPR) BLOCK ... else BLOCK
LABEL while (EXPR) BLOCK
LABEL while (EXPR) BLOCK continue BLOCK
LABEL for (EXPR; EXPR; EXPR) BLOCK
LABEL foreach VAR (LIST) BLOCK
LABEL BLOCK continue BLOCK
Обратите внимание, что сложные предложения описаны в термах блоков а не предложений как в языках C или Pascal. Поэтому необходимо всегда использовать круглые скобки для обозначения блока.
if (EXPR) BLOCK – Вычисляется логическое выражение
EXPRи если
true блок выполняется.
Пример:
$var =1;
if ($var == 1)
{ print $var,"\n";
}
Результат: 1

if (EXPR) BLOCKelseBLOCK2– Если
EXPR=
trueвыполняется BLOCK иначе BLOCK2.
Пример:
$var =2;
if ($var == 1)
{ print «\$var = 1\n»;
}
else
{ print «\$var не равно 1\n»;
}
Результат: $var не равно 1
if (EXPR1) BLOCK1 elsif (EXPR2)
BLOCK2 ...