Запишите это:
-f
: perldoc -f -X . Если имя файла не указано (как в данном случае), проверяется, $_
содержится ли имя простого файла
>
: Проверяет, больше ли RHS, чем LHS
@+
: В скалярном контексте возвращает количество элементов в @+
?
: условный оператор
*<
: Шар для main::<
.
: Оператор конкатенации строк
-&'_
: Вызывает подпрограмму main::_
. К вашему сведению, '
это perl4
разделитель имен пакетов стилей. Попробуй perl -MHTML'Template -e 1
.
:
: Продолжение с условным оператором
$#
: Формат вывода для напечатанных номеров
/
: Оператор подразделения
%!
: %ERRNO
; смотри perldoc perlvar
Таким образом, это не невозможно понять, если вы приложите немного усилий. Очевидно, что это не то, как кто-то должен писать программы, но есть некоторая выгода от людей, раздвигающих границы.