Встроенные переменные Perl.
Описанные в данной главе переменные имеют в Perl специальные значения.
Они обозначаются несколько непривычно для "глаза" программистов,
т.к. состоят обычно только из двух символов, причем первый это '$'
символ, с которого начинаются имена всех переменных, и произвольный часто
не буквенно-цифровой символ. Если вы хотите пользоваться их "нормальными"
буквенными синонимами, то вам нужно указать в начале программы:
use English;
Точно так же если вы захотите пользоваться переменными и методами
текущего указателя файлов вы можете написать:
use FileHandle;
после этого можно просто писать:
метод указатель выражение
или
указатель -> метод(выражение)
Ниже приводятся имена как в короткой, так и в длинной (словесной) форме.
Некоторые из встроенных переменных имеют доступ только на чтение,
поэтому изменить их значение просто невозможно.
$_$ARG
Переменная - по умолчанию для операторов ввода и поиска.
То есть если в качестве аргумента не указана никакая переменная, то
используется именно эта.
$цифра
Содержит найденную подстроку в последнем поиске, когда
шаблон содержит метасимволы в круглых скобках. Цифра в данном
случае, это номер скобок. Первая подстрока имеет номер 1.
$&
$MATCH
Найденная подстрока в последнем поиске по шаблону.
$`
Подстрока, предшествующая найденной подстроке.
$'
$POSTMATCH
Подстрока, последующая за найденной подстрокой.
$+
$LAST_PAREN_MATCH
Подстрока, найденная в поиске с выбором по "или".
$*
$MULTILINE_MATCHING
Если значение этой переменной установить равным 1, то
переменная, в которой осуществляется поиск, будет считаться многострочной,
т.е. содержащей символы '\n' - перевод строки. Если значение равно 0,
то переменная считается однострочной. В Perl версии 5 и выше не рекомендуется
использовать эту переменную.
$.
$INPUT_LINE_NUMBER
$NR
Номер прочитанной строки последнего оператора ввода.
Закрытие файла вызывает очистку значения этой переменной.
$/
$RS
$INPUT_RECORD_SEPARATOR
Символ - признак конца входной строки. По умолчанию это '\n'
$|
$OUTPUT_AUTOFLUSH
Если присвоить этой переменной ненулевое значение, то будет
сброс буфера вывода после каждой операции вывода. Значение по умолчанию - 0
$,
$OFS
$OUTPUT_FIELD_SEPARATOR
Символ, добавляемый оператором print после каждого элемента
из списка параметров.
$\
$ORS
$OUTPUT_RECORD_SEPARATOR
Символ, добавляемый print после вывода всех параметров.
$"
$LIST_SEPARATOR
Аналогичен "$,", но добавляется после каждого элемента массива,
указанного в "....".
$;
$SUBSEP
$SUBSCRIPT_SEPARATOR
Символ - разделитель для эмуляции многомерных массивов в хеш
массивах. По умолчанию '\034'.
$#
$OFMT
Формат по умолчанию для вывода чисел.
$%
$FORMAT_PAGE_NUMBER
Формат по умолчанию для вывода номеров страниц.
$=
$FORMAT_LINES_PER_PAGE
Длина одной страницы. По умолчанию 60 строк.
$-
$FORMAT_LINES_LEFT
Количество оставшихся строк на странице.
$~
$FORMAT_NAME
Имя формата текущего вывода. По умолчанию имя указателя.
$^
$FORMAT_TOP_NAME
Имя текущего формата для заголовка страницы.
$:
$FORMAT_LINE_BREAK_CHARACTERS
Символы переноса строки для многострочных полей. В строке
формата такие поля начинаются символом '^'. По умолчанию '\n-'.
$^L
$FORMAT_FORMFEED
Символ перевода формата ( смены листа). По умолчанию '\f'.
$^A
$ACCUMULATOR
Текущее значение аккумулятора функции write() для format().
Значение этой переменной можно увидеть только при использовании
функции formline(), т.к. write() очищает ее после каждого вывода.
$?
$CHILD_ERROR
Данная переменная содержит статус завершения таких процессов
как: закрытие pipe, завершение функций system(), wait() и `...`.
$!
$ERRNO
$OS_ERROR
В числовом контексте возвращает код ошибки errno.
В строковом - строку сообщения об ошибке. Можно принудительно
присвоить этой переменной код ошибки, что бы получить системное
сообщение для данного кода или установить код завершения для
функции die().
$@
$EVAL_ERROR
Сообщение об ошибке последней команды eval().
$$
$PID
$PROCESS_ID
Номер текущего процесса.
$<
$UID
$REAL_USER_ID
Реальный UID текущего процесса.
$>
$EUID
$EFFECTIVE_USER_ID
Эффективный UID текущего процесса.
$(
$GID
$REAL_GROUP_ID
Реальный GID текущего процесса.
$)
$EGID
$EFFECTIVE_GROUP_ID
Эффективный GID текущего процесса.
$O
$PROGRAM_NAME
Имя файла программы. Если этой переменной присвоить какое-нибудь значение, то его можно видеть в команде ps, что удобно для
контроля за состоянием программы.
$[
Номер первого элемента массива или символа строки.
Значение по умолчанию - 0.
$]
$PERL_VERSION
Строка - сообщение версии Perl. Печатается по команде perl -v
Применяется в программе для определения рабочей версии Perl.
В числовом контексте это номер версии плюс номер модификации / 1000.
$^D
$DEBUGGING
Текущее значение ключа отладки '-D'.
$^F
$SYSTEM_FD_MAX
Номер максимального системного описателя файлов (system file
descriptor). Обычно это 2.
$^I
$INPLACE_EDIT
Текущее значение inplace-edit возможности.
Для отключения используйте undef.
$^P
$PERLDB
Внутренний флаг отладки. Применяется для того, чтобы отладчик
не отслеживал самого себя.
$^T
$BASETIME
Время в секундах с начала 1970 года старта текущей программы.
$^W
$WARNING
Значение флага '-w'. true -если включено и false - выключено.
$^X
$EXECUTABLE_NAME
Команда запуска Perl. Аналогично argv[0] в С.
$ARGV
Имя текущего файла, читаемого оператором '<>'.
@ARGV
Массив параметров строки запуска программы.
Внимание! @#ARGV - меньше количества параметров на 1, т.к.
$ARGV[0] это первый параметр (не имя программы).
@INC
Список директорий диска, которые просматривает Perl
для выполнения команд do, require или use.
%INC
Этот хеш содержит имена директорий для имен использованных
файлов командами do или require. Ключ - имя файла, а значение - директория.
$ENV{выражение}
Хеш %ENV содержит значения переменных окружения. Изменение
этих значений вызывает изменение окружения для процессов потомков.
$SIG{выражение}
Хеш %SIG содержит имена подпрограмм для таких системных
сигналов как INT, QUIT, PIPE, ...
Значение 'DEFAULT' - для системной обработки.
'IGNORE' - игнорировать данный сигнал.
|
Глава 5 
