СОДЕРЖАНИЕ

Как создать свой сайт Создать сайт
Основы Интернет : FTP HTTP хостинг Вводный курс
Создание сайтов : создать сайт Создание сайтов
Статьи о хостинге : платный бесплатный выделенный сервер Unix Все о хостинге
Учебник HTML Учебник HTML
Учебник CSS Учебник CSS
Учебник CGI : cgi-программирование : методы GET и POST Учебник CGI
Учебник php Учебник PHP
Учебник perl Учебник Perl
Раскрутка сайта : оптимизация кода ключевые слова индекс цитирования регистрация в поисковиках Раскрутка сайта
Заработок на сайте Заработок на сайте
Платёжные системы : rupay webmoney Платежи в сети
книги литература по html css xml flash java Dreamweaver Нужные книги

 

заработок для вебмастера
Заработок для начинающего вебмастера!

 


создать сайт // учебник perl // оператор if

Оператор if в Perl

Для управления условным выполнением операторов Perl обычно используется оператор if. Синтаксис этого оператора приведён ниже:

if (выражение) БЛОК

Работает оператор if так: если выражение истинно, блок кода выполняется. Если выражение ложно, блок кода не выполняется. Рассмотрим пример:

if ( $r==5) {
    print 'Переменная $r равна 5.';
}

В этом примере проверяется значение переменной $r на равенство 5. (Символы == - это оператор равенства; не путайте его с оператором присваивания =.) Если операнды обеих сторон этого оператора (в нашем случае $r и 5) численно равны, выражение считается истинным и выполняется оператор print. Если значение $r не равно 5, оператор print не выполняется.

Оператор if позволяет также выполнить один фрагмент кода, если некоторое условие истинно, и другой фрагмент кода - если это условие ложно. Это достигается с помощью использования оператора if-else. Его синтаксис имеет вид:

if (выражение)
   
БЛОК
else
   
БЛОК

Блок, следующий за выражением, выполняется, если оно истонно, а блок после ключевого слова else - если выражение ложно. Приведём пример использования описываемого оператора:

$r=<STDIN>; chomp $r;
if ( $r==5) {
    print 'Переменная $r равна 5.';
} else {
    print 'Переменная $r не равна 5.';
}

Существует еще одна разновидность оператора if, с помощью которой можно проверить значения нескольких выражений и выполнить код соответствующий истинному условию:

if (выражение_1)
   
БЛОК 1
elsif (выражение_2)
   
БЛОК 2
else
   
БЛОК 3

Данный оператор выполняется следующим образом: если выражение, помеченное как выражение_1, истинно - выполняется блок кода БЛОК 1. Иначе управление передаётся оператору elsif и проверяется значение выражения_2. Если ни выражение_1, ни выражение_2 не являются истинными, выполняется БЛОК 3. Для демонстрации такой синтаксической конструкции расмотрим реальный фрагмент программы на Perl:

$r=<STDIN>; chomp $r;
if ( $r==10 ) 
    {
    print 'Переменная $r равна 10.';
    }
elsif ( $r==20 )
    {
    print 'Переменная $r равна 20.';
    }
else {
    print 'Переменная $r не равна ни 10, ни 20.';
    }

 



 

 

 

 

как создать свой сайт