ВУЗ:
Составители:
Рубрика:
if ($var == 1)
{ print "\$var = 1\n";
}
else
{ print "\$var не равно 1\n";
}
Результат: $var не равно 1
if (EXPR1) BLOCK1 elsif (EXPR2) BLOCK2 ... else
BLOCK -
Если EXPR1=true выполняется BLOCK1 иначе если EXPR2=true
выполняется BLOCK2 иначе ... иначе BLOCK.
Пример 3:
$var = 1;
if ($var == 0)
{ print "\$var = 0\n";
}
elsif ($var == 1)
{ print "\$var = 1\n";
}
else
{ print "Не известное \$var\n";
}
Результат: $var = 1
Цикл while выполняет BLOCK до тех пор пока EXPR = true. Метка
LABEL не обязательна и состоит из идентификатора завершающегося симво-
лом ':'. Метка необходима при использовании внутри блока цикла управляю-
щих операторов next, last и redo. Если метка все же отсутствует, то эти опера-
торы ссылаются к началу ближайшего цикла. Блок после continue выполняется
всегда перед тем как вычисляется логическое выражение EXPR. Это подобно
EXPR3 в предложении for поэтому в этом блоке удобно изменять счетчики и
флаги цикла даже если применяется оператор next.
Операторы управления циклом
next - подобен continue в С. Переходит к началу текущего цикла т.е. повторя-
ет итерацию.
Пример 4:
M1:
while ($i < 6)
{
++$i; # Увеличиваем счетчик на 1
18
Страницы
- « первая
- ‹ предыдущая
- …
- 16
- 17
- 18
- 19
- 20
- …
- следующая ›
- последняя »
