| 
 Правила хорошего тона при разработке CGI программ 
Для начала я расскажу Вам о существовании функции USE. 
Функция USE 
use модуль список
use модуль 
Указывает библиотечный модуль, из которого можно вызывать подпрограммы. Список перечисляет имена подпрограмм, которые добавляются к текущей области имен. Если не указан, то все имена. Действие аналогично блоку:  
	BEGIN { require модуль; import модуль список; }
Сам модуль должен располагаться в системной области Perl файлов. 
 
И так, основные правила этикета, которых нужно придерживаться при написании программ: 
- Вызывать Perl интерпретатор нужно с параметром "-w". Это заставит его более тщательно анализировать код с целью выявления сбойных или потенциально сбойных участков;
 - Используйте в программе прагму (модуль) Strict. Аналогично предыдущему пункту, но код анализируется еще строже;
 - Описывайте все переменные, которые используете в программе. Описать переменную можно оператором my();
 - Не проводите никаких операций над не определенными или не существующими переменными, ячейками массива или ключами хеша. Программно проверяйте "наличие" ячейки массива или ключа хеша перед операцией, если не уверенны в их существовании на момент использования;
 - Давайте переменным "говорящие" имена. Это облегчит жизнь Вам и Вашим коллегам при анализе кода;
 - Не используйте оператор goto!
 - Старайтесь не создавать рекурсивных функций (функции, которые вызываются сами из-под себя), они иногда приводят к возникновению "вечных циклов". А это в свою очередь является ошибкой программирования;
 - Сопровождайте комментариями все строки кода, которые могут интерпретироваться читателем двояко или будут непонятны.
 
Вообще, комментарии никогда не бывают лишними. Код, где комментирована буквально каждая строка легко читается и отлаживается; они помогут Вам вспомнить и разобраться в коде, который вы когда-то начали писать, но, по каким-то причинам, не закончили;
 - Не пишите строки, которые выходят за пределы экрана. Оптимальным кол-вом символов в строке является 66-88;
 - В блоках кода (участках, заключенных в фигурные скобки) текст должен иметь выступ в 1 табуляционный символ или в 5 пробельных символов;
 - Не пишите код сплошным текстом. Разбивайте его на функциональные участки и оформляйте их в процедуры;
 - Перед выполнением операции деления проверяйте, не производится ли деление на ноль;
 - Перед открытием файла проверяйте его на предмет существования и возможности открытия (бывает так, что файл существует, но занят другим приложением);
 - Используйте альтернативные операции при невозможности выполнить какое-либо действие. К примеру, используйте операторы || (or) и die, если имеет место ошибка при открытии файла.
  
Из всего вышесказанного, грамотно написанная программа выглядит примерно так: 
#!/usr/bin/perl -w 
use strict; 
print "Content-type: text/html\n\n";
my ($summ,$i);
$summ=0;
for ($i=-5;$i<=5;$i++){
	$summ+=10/$i if $i != 0;
}
print $summ;	# выводим сумму результатов деления 10 на
		# диапазон от -5 до 5
[Содержание] 
[Вступление] 
[необходимое для начала изучения] 
[урок 1] 
[урок 2] 
[урок 3] 
[урок 4] 
[урок 5] 
[урок 6] 
[урок 7] 
[урок 8] 
[урок 9] 
[урок 10] 
[урок 11] 
[урок 12] 
[урок 13] 
[урок 14] 
[урок 15] 
[урок 16] 
[урок 17] 
[урок 18] 
[урок 19] 
[урок 20] 
[урок 21] 
[урок 22] 
[урок 23] 
[урок 24] 
[урок 25] 
[урок 26] 
[урок 27] 
[урок 28] 
[правила хорошего тона] 
[приложение A] 
[приложение Б] 
[приложение В] 
[заключение] 
[благодарности] 
 
  |