Я учусь писать приложение CGI с Perl - Кевином Мельцером. Брент Михальски
Сценарии в книге в основном начинаются с этого:
#!"c:\strawberry\perl\bin\perl.exe" -wT
# sales.cgi
$|=1;
use strict;
use lib qw(.);
Какая линия $| = 1; Как его проложить, например. $| = 1; или $| = 1;? Зачем использовать строгое; после $| = 1;
Спасибо
perlvar является вашим другом. Он документирует все эти критические специальные переменные.
$OUTPUT_AUTOFLUSH (aka $|):
Если установлено ненулевое значение, сразу же отключается поток и после каждой записи или печати на выбранном в данный момент выходном канале. Значение по умолчанию равно 0 (независимо от того, действительно ли канал буферизуется системой или нет; $| сообщает вам, только ли вы попросили Perl явно очистить после каждой записи). STDOUT, как правило, буферизуется в строке, если вывод - на терминал, а буферный буфер - в противном случае. Установка этой переменной полезна в первую очередь при выводе на канал или сокет, например, когда вы запускаете программу Perl под rsh и хотите видеть результат как это происходит. Это не влияет на буферизацию ввода. См. Getc для этого. Смотрите, как выбрать выходной канал. См. Также IO:: Handle.
Мнемоника: когда вы хотите, чтобы ваши трубы были горячими.
Счастливое кодирование.
По другим вопросам:
Нет причин, по которым use strict; появляется после $|, за исключением соглашения с программистами. $| и другие специальные переменные не подвержены строгим таким образом. Интервал также не важен - просто выберите соглашение и будьте последовательны. (Я предпочитаю пробелы.)
$| = 1; заставляет промывку после каждой записи или печати, поэтому выход появляется, как только он генерируется, а не буферизуется.
См. документацию perlvar.
$| - это имя специальной переменной. Вы не должны вводить пробел между $ и |.
Если вы используете пробелы вокруг = или нет, это не имеет значения для Perl. Лично я думаю, что использование пробелов делает код более читаемым.
Почему use strict; появляется после $| = 1; в вашем script, я не знаю, за исключением того, что они оба такие вещи, которые вы бы поставили прямо вверху, и вы должны их вставить одного порядка или другого. Я не думаю, что это важно, прежде всего.
Не имеет значения, где в script вы помещаете оператор use, потому что все они оцениваются во время компиляции.
$| - встроенная переменная для автозапуска. Я согласен, что в этом случае это неоднозначно. Однако одиночный $ не является корректным выражением в perl, поэтому в процессе устранения мы можем сказать, что он должен означать.
use lib qw(.) кажется глупым делом, поскольку "." уже по умолчанию @INC. Возможно, это из-за старой книги. Это утверждение говорит perl добавить ".". к массиву @INC, который является "средой пути" для perl, то есть там, где он ищет модули и т.д.