использовать строгий; печать "Content-Type: текст /HTML \\ п \\ п"; мой $ числитель = 8; мой $ знаменатель = 2; если ($ знаменатель = 0) {$ моей Ответ = $ числитель /знаменатель $; печать $ ответ; } Еще {печать "Деление на ноль не допускается!"; } Конкретный сегмент кода в том, что в если-блока. Читайте и попробовать выше код, если вы не сделали этого. Код должен быть очевидными. Измените значение знаменателя от 2 до 0 и попробовать код. Остановимся здесь для этой части серии. Мы по-прежнему в следующей части.
Клейс Чтобы прийти в любой из частей этой серии, просто наберите соответствующее название ниже в окно поиска этой страницы и нажмите кнопку Поиск (меню используйте если имеется): Начало работы с ActivePerl ActivePerl основной синтаксис Основы ActivePerl переменных ActivePerl Условные операторы булевых Логика для ActivePerl булевой логики и ActivePerl условия ActivePerl сравнения и арифметические операторы ActivePerl Loop отчетность ActivePerl Массивы ActivePerl Хэши ActivePerl типы переменных и контекст ActivePerl Подпрограммы ActivePerl цикл по каждому элементу Введение в ActivePerl специальные переменные Основы ActivePerl видимости переменных Некоторые ActivePerl Предопределенные Подпрограммы Белый пространства в ActivePerl Основы ActivePerl справочники Основы ошибках в ActivePerl Файл Доступ Основы в ActivePerl Отправка формы HTML с ActivePerl