Страница:
Значение каждого элемента внутри списка увеличивается на 1.
Данный оператор удобен для небольших циклов т.к. память отводится для всего списка целиком. Поэтому будьте внимательны и не задавайте слишком большой диаппазон.
Пример:
for $i (1..4)
{ print "$i ";
}
Результат: 1 2 3 4
В скалярном контексте результат – логическое значение. Каждая '..' операция устанавливает свое собственное состояние. Это false до тех пор пока левый операнд false. Как только левый операнд стал true результат – true до тех пока правый true, после чего результат опять – false. Если вы не хотите проверять правый операнд то используйте оператор '...'.
Правый операнд не вычисляется пока результат false и левый операнд не вычисляется пока пока результат true. Приоритетность оператора '..' немного ниже чем '&&' и '||'. Возвращаемое значение если flase – нулевая строка, если true – порядковый номер начиная с 1. Порядковый номер обнуляется для каждого нового диаппазона.
Последний порядковый номер добавляется строкой "E0" которая не изменяет его значение но позволяет фиксировать последнее значение.
Пример:
@алфавит = ('a'..'z'); # Массив малых букв латинского алфавита
@цифры = (0..9); # Массив цифр
Пример:
$i = 1;
$i > 1 ? print «больше» : print «меньше»;
Результат: меньше
$i += 2;
эквивалентно
$i = $i + 2;
Остальные операторы этой группы работают аналогично.
Допустимы следующие операторы:
**=
+= -= .=
*= /= %= x=
&= |= ^=
<<= >>=
&&= ||=
Приоритет всей этой группы операторов равен приоритету '='.
В списковом контексте это разделитель элементов списка который включает указанные элементы в список.
унарное & – получить адрес. Для этого применяется '\'.
унарный * – переадресация.
(TYPE) – совмещение типов.
По умолчанию Полное Функция Интерполяция
– – – –
'' q{} Literal нет
"" qq{} Литерал да
`` qx{} Команда да
qw{} Список слов нет
// m{} Шаблон да
s{}{} Подстановка да
tr{}{} Трансляция нет
В строках допускающих интерполяцию имена переменных начинающиеся с символов '$' или '@' – интерполируются т.е. в строку вставляется значение строки или массива.
Данные последовательности символов имеют специальное значение:
\t символ табуляции
\n символ новой строки
\r возврат
\f перевод формата
\v вертикальная табуляция
\b backspace (забой)
\a звонок
\e escape
\034 восьмеричный символ
\x1a шестьнадцатеричный символ
\c[ символ управления
\l нижний регистр следующего символа
\u верхний регистр следующего символа
\L нижний регистр для всех символов до \E
\U верхний регистр для всех символов до \E
\E ограничитель смены регистра
\Q отмена действия метасимволов до \E
Шаблоны интерполируются как регулярные выражения. Это выполняется вторым проходом после интерполяции переменных поэтому в шаблоны можно вставлять переменные. Для отмены интерполяции используйте '\Q'. Если вы применяете вложенные ограничители то внутренние ограничители работать не будут.
Действие этого оператора аналогично /шаблон/ но выполняется до первого совпадения. Это удобно для поиска наличия какой нибудь строки в одном или множестве файлов. Это не очень удачный оператор поэтому в следующих версиях Перл его возможно не будет.
m/PATERN/gimosx
/PATERN/gimosx
Поиск в строке по патерну (шаблону). В скалярном контексте возвращает логическое значение true (1) или false (''). Если строка не указана с помощью операторов '=~' или '!~' поиск ведется в строке $_
Опции:
g – Глобальный поиск. Поиск всех вхождений.
i – Сравнение не зависит от регистра (верхний или нижний)
m – Строка многострочна.
o – однопроходная компиляция
s – однострочная строка
x – используеются расширенные регулярные выражения.
Если '/' – ограничитель то начальное 'm' можно опустить. С помощью него в качестве ограничителя может быть любой символ кроме пробела.
PATTERN может содержать переменные которые будут интерполироваться (перекомпилироваться) каждый раз в момент вычисления.
Переменные $) и $| не интерполируются. Если вы хотите что бы такой шаблон интерполировался один раз – добавьте /o.
Это необходимо делать в циклах поиска для увеличения быстродействия однако если вы измените значение переменной Перл этого даже не заметит.
Если PATERN – нулевая строка то используется последнее регулярное выражение.
В скалярном контексте возвращается список элементы которого результаты выполнения выражений в скобках патерна ($1, $2, $3...).
Обратите внимание что первый елемент $1.
Пример:
$a = «/usr/local/perl/perl.bin»; # Анализируемая строка
Цель: Создать массив @dirs с именами директорий.
Решение:
Самый простой способ воспользоваться split('\/'), но в качестве примера используем скобки.
@dirs =~ m[/(\w*)/(\w*)/(\w*)/(\w*)]
Здесь 'm[' – использовать квадратные скобки как ограничители.
(\w*) – шаблон алфавитноцифровой последовательности.
В результате @dirs равен ('usr', 'local', 'perl')
Пример:
print q#Привет.#; # Результат Привет.
print 'O\'K'; # O'K
Пример:
$var = 13;
print «\$var = $var»;
Результат:
$var = 13
Пример:
print `date`;
Результат:
Thu Nov 14 13:36:49 MSK 1996
Пример:
print qw/Построемся и спасемся!/; # ('Построемся','и','спасемся!')
Результат:
Построемсяиспасемся!
Часто применяется как:
use POSIX qw( setlocale localeconv )
@EXPORT = qw( proc1 var );
Возвращает количество произведенных подстановок иначе false (0). Если строка в которой ведестя поиск не указана (операторы =~ или != ) то используется переменная $_ .
Если в качестве раделителя '/' исрользовать одинарную кавычку (') то интерполяции не будет иначе можно применять переменные в шаблоне или подстроке.
Опции:
e – Расмматривать правую часть как выражение.
g – Глобальный поиск.
i – Без различия регистра букв
m – многосточная переменная
o – компилировать шаблон один раз
s – однострочная переменная
x – расширенное регулярное выражение
Разделитель '/' можно заменить на любой алфавитно-цифровой символ кроме пробела.
Пример:
$var = «12345»; # исходная строка
$var =~ s/1/0/; # Заменить '1' на '0'. Результат 02345
$var =~ s(5)(.); # Заменить '5' на '.' Результат 0234.
Здесь в качестве разделителя применены скобки поэтому подстрока
взята в две скобки.
$var =~ s/\d*/каламбур/; Заменить все цифры. Результат 'каламбур.'
$var =~ s/а/о/g; # Заменить все 'а' на 'о'. Результат 'коломбур.'
$var = «12 34»; # Новое значение
$var =~ s/(\d\d) (\d\d)/$2 $1/; # Поменять местами числа. Результат '34 12'.
tr/таблица1/таблица2/cds
y/таблица1/таблица2/cds
Замена всех символов из «таблица1» на соответсвующий символ из «таблица2». Результат – количество замен или стираний. Без оператора =~ или != операция выполняется с строкой $_. Для совместимости с программой sed вместо tr можно писать 'y'.
Опции:
c – дополнение «таблица1»
d – стереть найденные но не замененные символы.
s – «зжать» повторяющиеся замененные символы.
Если указана опция /dтаблица2 всегда интерпретируется как положено.
Другими словами если таблица2 короче чем таблица1 то символ из таблицы1 интерпретируется всегда. Если таблица2 – null то все символы строки остаются не изменненные. Это удобно для подсчета количества сиволов в строке определенного класса или для сжатия повторяющихся символов например пробелов.
Пример:
$s = «hello»; # Исходная строка
$s =~ tr/a-z/A-Z/; # Заменить малые буквы на большие. Результат
# 'HELLO'
$s = 'Hel....lo';
$s =~ tr/a-zA-z/_/c; # Заменить все не буквы на '_'
# Результат 'Hel____lo'
$s =~ tr/_/ /s; # Заменить '_' на ' ' и сжать.
# Результат 'Hel lo'
$s =~ tr/a-zA-Z /a-zA-Z/d; # Удалить все не буквы. Результат 'Hello'
Если один и тот же символ несколько раз указан в таблице1 то применяется только первая замена.
Статус выполненой команды хранится в переменной $? .
Следующая команда ввода вывода выглядит как '<файл>'.
Вычисление <файл> приводит к чтению строки из файла. Обратите внимание что 'файл' здесь не имя файла, а указатель файла который создается функцией open(). В скалярном контексте читается одна строка вместе с символом '\n' – перевода строки, а в списковом весь файл читается в список элементы которого суть строки файла.
В случае обнаружения конца файла результат оператора не определен и воспринимается как false. Если не указана переменная результата то по умолчанию это $_. Указатель файла по умолчанию STDIN – стандартный ввод.
Пример:
while(<>) { print; }; # Прочитать и вывести весь файл STDIN
У оператора '<>' есть одна отличительная особенность. Если в командной строке нет никаких аргументов то читается стандартный ввод, если есть аргументы то они считаются именами файлов которые последовательно читаются.
Если в угловых скобках записана переменная то содержимое этой переменной считается именем указателя файла или ссылкой на указатель файла. Если такого указателя не существует то содержимое переменной воспринимается как шаблон имен файлов и результат – имена файлов на диске подходящих по шаблону.
Пример:
while(<*.pl>) { print;}; # То же что и ls *.pl
@files = <*>; # Массив @files содержит имена файлов в директории
но лучше сделать: @files = glob("*"); т.к. внутри скобок можно использовать переменные.
Так подстановка символов после '\' , операция конкатенации строк, арифметические выражения содержащие только одни константы, все это делается в момент компиляции что существенно увеличивает скорость выполнения программы.
use integer;
то компилятор будет использовать целочисленную арифметику до конца текущего блока, хотя вложенный блок может это и отменить в своих пределах с помощью:
no integer;
Данный оператор удобен для небольших циклов т.к. память отводится для всего списка целиком. Поэтому будьте внимательны и не задавайте слишком большой диаппазон.
Пример:
for $i (1..4)
{ print "$i ";
}
Результат: 1 2 3 4
В скалярном контексте результат – логическое значение. Каждая '..' операция устанавливает свое собственное состояние. Это false до тех пор пока левый операнд false. Как только левый операнд стал true результат – true до тех пока правый true, после чего результат опять – false. Если вы не хотите проверять правый операнд то используйте оператор '...'.
Правый операнд не вычисляется пока результат false и левый операнд не вычисляется пока пока результат true. Приоритетность оператора '..' немного ниже чем '&&' и '||'. Возвращаемое значение если flase – нулевая строка, если true – порядковый номер начиная с 1. Порядковый номер обнуляется для каждого нового диаппазона.
Последний порядковый номер добавляется строкой "E0" которая не изменяет его значение но позволяет фиксировать последнее значение.
Пример:
@алфавит = ('a'..'z'); # Массив малых букв латинского алфавита
@цифры = (0..9); # Массив цифр
Условный оператор '?:'
Этот оператор работает так же как и в С. Если выражение перед '?' истинно то выполняется аргумент перед ':' – иначе после ':'.Пример:
$i = 1;
$i > 1 ? print «больше» : print «меньше»;
Результат: меньше
Операторы присваивания.
'=' – обычный оператор «присвоить» правое значение переменной слева Вся эта группа операторов подобна операторам С т.е.$i += 2;
эквивалентно
$i = $i + 2;
Остальные операторы этой группы работают аналогично.
Допустимы следующие операторы:
**=
+= -= .=
*= /= %= x=
&= |= ^=
<<= >>=
&&= ||=
Приоритет всей этой группы операторов равен приоритету '='.
Оператор ',' (запятая)
В скалярном контексте выполняется левый аргумент, результат игнорируется затем правый и его результат есть результат действия оператора.В списковом контексте это разделитель элементов списка который включает указанные элементы в список.
Оператор логическое not (орицание).
Унарный not возвращает противоположное значение полученное выражением справа. Он эквивалентен '!' но имеет очень низкий приоритет.Оператор логическое and (И).
Выполняет логическую конъюнкцию двух выражений. Эквивалентен '&&' но имеет очень низкий приоритет и «краткость» действия. т.е если левое выражение равно false – левое не выполняется.Логическое or (ИЛИ).
Выполняет логическую дизъюнкцию двух выражений. Эквивалентен '||', но имеет очень низкий приоритет и «краткость» действия. т.е если левое выражение равно true – левое не выполняется.Логическое xor (исключающее ИЛИ).
Выполняет логическое исключающие или. Всегда выполняются оба правое и левое выражение.С операторы отсутствующие в Перл.
В Перл отсутсвуют операторы языка С такие как:унарное & – получить адрес. Для этого применяется '\'.
унарный * – переадресация.
(TYPE) – совмещение типов.
Операторы ограничители строк.
Обычно ограничители строк мы считаем литералами, но в Перл это операторы выполняющие разного рода интерполяцию и поиск по шаблону. Вы можете сами задавать удобные для вас ограничители. В следующей таблице приведен полный перечень вариантов. Фигурные скобки '{}' обозначают любой символ используемый для ограничителя. В случае использования скобок (круглых '()', квадратных '[]', фигурных '{}', угловых '<>') в начале ставится открывающаяся скобка а в конце закрывающая.По умолчанию Полное Функция Интерполяция
– – – –
'' q{} Literal нет
"" qq{} Литерал да
`` qx{} Команда да
qw{} Список слов нет
// m{} Шаблон да
s{}{} Подстановка да
tr{}{} Трансляция нет
В строках допускающих интерполяцию имена переменных начинающиеся с символов '$' или '@' – интерполируются т.е. в строку вставляется значение строки или массива.
Данные последовательности символов имеют специальное значение:
\t символ табуляции
\n символ новой строки
\r возврат
\f перевод формата
\v вертикальная табуляция
\b backspace (забой)
\a звонок
\e escape
\034 восьмеричный символ
\x1a шестьнадцатеричный символ
\c[ символ управления
\l нижний регистр следующего символа
\u верхний регистр следующего символа
\L нижний регистр для всех символов до \E
\U верхний регистр для всех символов до \E
\E ограничитель смены регистра
\Q отмена действия метасимволов до \E
Шаблоны интерполируются как регулярные выражения. Это выполняется вторым проходом после интерполяции переменных поэтому в шаблоны можно вставлять переменные. Для отмены интерполяции используйте '\Q'. Если вы применяете вложенные ограничители то внутренние ограничители работать не будут.
?PATERN?
?PATERN?Действие этого оператора аналогично /шаблон/ но выполняется до первого совпадения. Это удобно для поиска наличия какой нибудь строки в одном или множестве файлов. Это не очень удачный оператор поэтому в следующих версиях Перл его возможно не будет.
m/PATERN/gimosx
/PATERN/gimosx
Поиск в строке по патерну (шаблону). В скалярном контексте возвращает логическое значение true (1) или false (''). Если строка не указана с помощью операторов '=~' или '!~' поиск ведется в строке $_
Опции:
g – Глобальный поиск. Поиск всех вхождений.
i – Сравнение не зависит от регистра (верхний или нижний)
m – Строка многострочна.
o – однопроходная компиляция
s – однострочная строка
x – используеются расширенные регулярные выражения.
Если '/' – ограничитель то начальное 'm' можно опустить. С помощью него в качестве ограничителя может быть любой символ кроме пробела.
PATTERN может содержать переменные которые будут интерполироваться (перекомпилироваться) каждый раз в момент вычисления.
Переменные $) и $| не интерполируются. Если вы хотите что бы такой шаблон интерполировался один раз – добавьте /o.
Это необходимо делать в циклах поиска для увеличения быстродействия однако если вы измените значение переменной Перл этого даже не заметит.
Если PATERN – нулевая строка то используется последнее регулярное выражение.
В скалярном контексте возвращается список элементы которого результаты выполнения выражений в скобках патерна ($1, $2, $3...).
Обратите внимание что первый елемент $1.
Пример:
$a = «/usr/local/perl/perl.bin»; # Анализируемая строка
Цель: Создать массив @dirs с именами директорий.
Решение:
Самый простой способ воспользоваться split('\/'), но в качестве примера используем скобки.
@dirs =~ m[/(\w*)/(\w*)/(\w*)/(\w*)]
Здесь 'm[' – использовать квадратные скобки как ограничители.
(\w*) – шаблон алфавитноцифровой последовательности.
В результате @dirs равен ('usr', 'local', 'perl')
q/строка/ 'строка'
Строка литералов. Не интерполируется. Внутри строки разрешается использовать \' или \\ для обозначения символов ' и \ .Пример:
print q#Привет.#; # Результат Привет.
print 'O\'K'; # O'K
qq/строка/ «строка»
Интерполируемая строка.Пример:
$var = 13;
print «\$var = $var»;
Результат:
$var = 13
qx/строка/ `строка`
Сначала строка интерполируется а потом выполняется как системная команда.Пример:
print `date`;
Результат:
Thu Nov 14 13:36:49 MSK 1996
qw/строка/
Возвращает список элементы которого – слова строки разделенные пробелами.Пример:
print qw/Построемся и спасемся!/; # ('Построемся','и','спасемся!')
Результат:
Построемсяиспасемся!
Часто применяется как:
use POSIX qw( setlocale localeconv )
@EXPORT = qw( proc1 var );
s/шаблон/подстрока/egimosx
Поиск по шаблону и в случае успеха замена подстрокой.Возвращает количество произведенных подстановок иначе false (0). Если строка в которой ведестя поиск не указана (операторы =~ или != ) то используется переменная $_ .
Если в качестве раделителя '/' исрользовать одинарную кавычку (') то интерполяции не будет иначе можно применять переменные в шаблоне или подстроке.
Опции:
e – Расмматривать правую часть как выражение.
g – Глобальный поиск.
i – Без различия регистра букв
m – многосточная переменная
o – компилировать шаблон один раз
s – однострочная переменная
x – расширенное регулярное выражение
Разделитель '/' можно заменить на любой алфавитно-цифровой символ кроме пробела.
Пример:
$var = «12345»; # исходная строка
$var =~ s/1/0/; # Заменить '1' на '0'. Результат 02345
$var =~ s(5)(.); # Заменить '5' на '.' Результат 0234.
Здесь в качестве разделителя применены скобки поэтому подстрока
взята в две скобки.
$var =~ s/\d*/каламбур/; Заменить все цифры. Результат 'каламбур.'
$var =~ s/а/о/g; # Заменить все 'а' на 'о'. Результат 'коломбур.'
$var = «12 34»; # Новое значение
$var =~ s/(\d\d) (\d\d)/$2 $1/; # Поменять местами числа. Результат '34 12'.
tr/таблица1/таблица2/cds
y/таблица1/таблица2/cds
Замена всех символов из «таблица1» на соответсвующий символ из «таблица2». Результат – количество замен или стираний. Без оператора =~ или != операция выполняется с строкой $_. Для совместимости с программой sed вместо tr можно писать 'y'.
Опции:
c – дополнение «таблица1»
d – стереть найденные но не замененные символы.
s – «зжать» повторяющиеся замененные символы.
Если указана опция /dтаблица2 всегда интерпретируется как положено.
Другими словами если таблица2 короче чем таблица1 то символ из таблицы1 интерпретируется всегда. Если таблица2 – null то все символы строки остаются не изменненные. Это удобно для подсчета количества сиволов в строке определенного класса или для сжатия повторяющихся символов например пробелов.
Пример:
$s = «hello»; # Исходная строка
$s =~ tr/a-z/A-Z/; # Заменить малые буквы на большие. Результат
# 'HELLO'
$s = 'Hel....lo';
$s =~ tr/a-zA-z/_/c; # Заменить все не буквы на '_'
# Результат 'Hel____lo'
$s =~ tr/_/ /s; # Заменить '_' на ' ' и сжать.
# Результат 'Hel lo'
$s =~ tr/a-zA-Z /a-zA-Z/d; # Удалить все не буквы. Результат 'Hello'
Если один и тот же символ несколько раз указан в таблице1 то применяется только первая замена.
Операторы ввода-вывода.
В Перл существует несколько операторов ввода-вывода. Первый это скобки из символа '`' – акцента. Строка в этих скобках воспринимается как системная команда и результат ее действия возвращается как «псевдо» литерал. В скалярном контексте это строка содержащая весь результат, а в списковом – список элементы которого – строки результата.Статус выполненой команды хранится в переменной $? .
Следующая команда ввода вывода выглядит как '<файл>'.
Вычисление <файл> приводит к чтению строки из файла. Обратите внимание что 'файл' здесь не имя файла, а указатель файла который создается функцией open(). В скалярном контексте читается одна строка вместе с символом '\n' – перевода строки, а в списковом весь файл читается в список элементы которого суть строки файла.
В случае обнаружения конца файла результат оператора не определен и воспринимается как false. Если не указана переменная результата то по умолчанию это $_. Указатель файла по умолчанию STDIN – стандартный ввод.
Пример:
while(<>) { print; }; # Прочитать и вывести весь файл STDIN
У оператора '<>' есть одна отличительная особенность. Если в командной строке нет никаких аргументов то читается стандартный ввод, если есть аргументы то они считаются именами файлов которые последовательно читаются.
Если в угловых скобках записана переменная то содержимое этой переменной считается именем указателя файла или ссылкой на указатель файла. Если такого указателя не существует то содержимое переменной воспринимается как шаблон имен файлов и результат – имена файлов на диске подходящих по шаблону.
Пример:
while(<*.pl>) { print;}; # То же что и ls *.pl
@files = <*>; # Массив @files содержит имена файлов в директории
но лучше сделать: @files = glob("*"); т.к. внутри скобок можно использовать переменные.
Слияние констант.
Как и С Перл выполняет возможные вычисления в период компиляции.Так подстановка символов после '\' , операция конкатенации строк, арифметические выражения содержащие только одни константы, все это делается в момент компиляции что существенно увеличивает скорость выполнения программы.
Целочисленная арифметика.
По умолчанию Перл выполняет арифметику с плавающей запятой, но если вы укажете:use integer;
то компилятор будет использовать целочисленную арифметику до конца текущего блока, хотя вложенный блок может это и отменить в своих пределах с помощью:
no integer;
Встроенные функции
Встроенные функции используются как термы выражений и подразделяются на две категории: списковые операторы и унарные операторы. Это влияет на их приоритет по отношению к оператору ',' – запятая. Списковые операторы могут именть множество (список) аргументов, а унарные только один. Таким образом запятая завершает аргументы унарного оператора и разделяет аргументы спискового.
Аргумент унарного оператора воспринимается обычно в скалярном контексте а спискового как в скалярном так и
списковом причем скалярные аргументы идут первыми. В дальнешем списковые аргументы мы будем обозначать словом 'LIST' это значит что функция имеет список аргументов разделенных запятой.
Аргументы функций можно заключать в круглые скобки и таким образом обозначать что «это функция» и приоритет не имеет значения иначе это списковый или унарный оператор с определенным фиксированным приоритетом. Пробел после имени функции и скобкой значения не имеет. Поэтому будьте внимательны!
Пример:
print 1 + 2 + 3; # результат 6
print(1+2)+3; # результат 3
print (1+2)+3; # опять 3
print (1+2+3); # 6
Если функция возвращает результат как в скалярном так и в списковом контексте то код выхода по ошибке – скаляр c неопределенным значением или пустой список.
Запомните правило:
Не существует общего правила преобразования списка в скаляр!
Каждый оператор и функция имеют свой вид значения в скалярном котексте.
Для одних это количество элементов из скалярного контекста. Для других первый элемент списка или последний или количество успешных операций. Каждый свое если вы специально не указываете.
-X выражение
-X
Проверка файла, где 'X' одно из ниже описанных значений.
Это унарный оператор с одним аргументом – либо именем файла либо указателем файла. Проверяет одно из условий. Если аргумент не указан то берется значение переменной $_. Для ключа -t STDIN.
Результат 1 если true и '' если false или неопределенное значение если файл не найден. Несмотря на странный вид это унарный оператор с соответсвующим приоритетом. Аргумент можно заключать в круглые скобки.
'X' имеет следующие значения:
-r Файл разрешен на чтение эффективным uid/gid
-w на запись -//-
-x исполнение -//-
-o принадлежит эффективному uid (идентификатор пользователя)
-R Файл разрешен на чтение реальным uid/gid
-W на запись -//-
-X исполнение -//-
-O принадлежит реальному uid
-e файл существует
-z пустой
-s не пустой
-f обычный текст
-d директория
-l символическая ссылка
-p pipes (конвейер)
-S socket (гнездо)
-b специальное блочное устройство
-c -//– символьное -//-
-t указатель на уст-во tty
-u установлен бит setuid
-g -//– setgid
-k -//– sticky
-T текстовой файл
-B двоичный
-M «возраст» файла в днях на момент старта скрипта
-A дней с последнего чтения
-C дней с последней модификации inode
Возвращает остаток времени предыдущего счетчика.
Имя – пакетный адрес сокита.
В обычном режиме при вводе символы CR LF транслируются в LF, а при выводе LF транслируется в CR LF.
bless ссылка
Данная функция определяет что объект указанный ссылкой принадлежит классу. Если класс не указан то он относится к текущему классу. Обычно это последний оператор в конструкторе объекта.
Необходимо обязательно указывать имя класса если определяемый объект может наследоваться классом-потомком.
caller
Возвращает контекст вызова текущей подпрограммы.
В скалярном контексте true если это подпрограмма или процедура вызванная операторами eval() или require() и false – иначе.
В списковом это список ($package, $filename, $line)
где
$package – имя пакета
$filename – имя файла пакета
$line – номер строки откуда был сделан вызов.
Если указано выражение то возвращается список:
($package, $filename, $line, $subroutine, $hasargs, $wantargs)
Выражение определяет «глубину» вложенности просмотра стека вызовов.
$subroutine – имя подпрограммы
$hasargs – имеющиеся аргументы
$wantargs – необходимые аргументы
Применение данной функции в DB пакете возвращает более детальную информацию. К списку аргументов добавляется список @DB::args.
Возвращает true в случае успеха и false – неудачи.
Первый элемент в списке – числовое ,обычно восьмеричное значение прав.
Возвращает количество файлов которым были изменены права.
Пример:
chmod 0666 'f1', 'f2', 'f3';
chomp
Удаляет в конце строки символ указанный переменной $/.
Обычно это 'LF'. Возвращает количество удаленных символов. Если переменная не указана то используется переменная $_.
Если указан список то обрабатывается каждая строка списка и возвращается общее количество удаленных символов.
chop
Полностью аналогично функции chomp но всегда удаляет последний символ строки.
Первый элемент – номер нового владельца, второй номер новой группы а далее список файлов.
В большинстве Юникс-систем вы не сможете сменить владельца если вы не суперпользователь, но можете изменить группу если это одна из ваших «вторичных» групп.
«Корневая» – значит внутри программы на нее можно ссылаться как '/'.
если один и тот же файл открывается повтортно т.к. он будет автоматически закрываться новым вызовом open().
и false при ошибке.
Дело в том что в Перл реализован очень удобный механизм работы с базами данных типа dbm, ndbm, sbdm, gdbm и Berkeley DB. Для этого нужно связать (открыть) базу под именем хеша. Вся работа с записями базы выполняется так будто это обычный хеш (ассоциативный массив).
Более подробно смотрите описание функции AnyDBM().
Данная функция позволяет различать нулевое и не определенные значения, определенность или не определенность функций или ссылок. При использовании определенности ключа в хеше она возвращает определен данный ключ или нет но не существует он или нет.
Удаление из массива окружения $ENV{} – изменяет окружение.
Удаление из хеша связанного с базой данных – удаляет запись в базе данных.
При вызове из eval() сообщение об ошибке заносится в переменную $@ и eval() завершается с неопределенным значением. Это позволяет отробатывать ошибочные ситуации не завершая головной модуль.
Если строка из списка не завершается символом '\n' то дополнительно печатается номер строки скрипта откуда вызвана функция и номер входной строки исли таковой имеется.
BLOCK исполняется перед проверкой условия цикла в отличии от обычных циклов.
Изначально это применялось для включения подпрограмм библиотеки.
Сейчас правильней использовать вызовы use() и require() которые обеспечивают контроль ошибок и завершения.
Выполнение этой новой программы будет начинаться оператором goto метка. Если метка опущена то запуск сначала.
Внимание! Файлы открытые до момента дампа не будут открытыми
в момент исполнения новой программой.
eof()
eof
Возвращает 1 если выполняется чтение после конца или чтение из не открытого файла. Аргументом должно быть выражение возвращающее существующий указатель файла. Данную функцию нельзя использовать для чтения файлов открытых как терминалы.
Если аргумент не указан то используется последний читаемый файл.
Использование в форме eof() целесообразно применять в циклах while(<>) для определения конца только последнего файла из
списка. Применяйте eof(ARGV) или eof для определения конца каждого файла из списка.
eval блок
Выражение сканируется и выполняется как обычная Перл программа.
Это делается в контексте текущей программы поэтому можно использовать уже определенные переменные и подпрограммы.
Ворзвращается результат последнего оператора в блоке или значение оператора return. Если обнаружится синтаксическая ошибка или выполнится оператор die возвращается не определенное значение а переменная $@ содержит сообщение об ошибке. Если ошибки не было то $@ содержит нулевую строку. При отсутсвии аргумента берется значение переменной $_.
Аргумент унарного оператора воспринимается обычно в скалярном контексте а спискового как в скалярном так и
списковом причем скалярные аргументы идут первыми. В дальнешем списковые аргументы мы будем обозначать словом 'LIST' это значит что функция имеет список аргументов разделенных запятой.
Аргументы функций можно заключать в круглые скобки и таким образом обозначать что «это функция» и приоритет не имеет значения иначе это списковый или унарный оператор с определенным фиксированным приоритетом. Пробел после имени функции и скобкой значения не имеет. Поэтому будьте внимательны!
Пример:
print 1 + 2 + 3; # результат 6
print(1+2)+3; # результат 3
print (1+2)+3; # опять 3
print (1+2+3); # 6
Если функция возвращает результат как в скалярном так и в списковом контексте то код выхода по ошибке – скаляр c неопределенным значением или пустой список.
Запомните правило:
Не существует общего правила преобразования списка в скаляр!
Каждый оператор и функция имеют свой вид значения в скалярном котексте.
Для одних это количество элементов из скалярного контекста. Для других первый элемент списка или последний или количество успешных операций. Каждый свое если вы специально не указываете.
Оператор '-X'.
-X указатель файла-X выражение
-X
Проверка файла, где 'X' одно из ниже описанных значений.
Это унарный оператор с одним аргументом – либо именем файла либо указателем файла. Проверяет одно из условий. Если аргумент не указан то берется значение переменной $_. Для ключа -t STDIN.
Результат 1 если true и '' если false или неопределенное значение если файл не найден. Несмотря на странный вид это унарный оператор с соответсвующим приоритетом. Аргумент можно заключать в круглые скобки.
'X' имеет следующие значения:
-r Файл разрешен на чтение эффективным uid/gid
-w на запись -//-
-x исполнение -//-
-o принадлежит эффективному uid (идентификатор пользователя)
-R Файл разрешен на чтение реальным uid/gid
-W на запись -//-
-X исполнение -//-
-O принадлежит реальному uid
-e файл существует
-z пустой
-s не пустой
-f обычный текст
-d директория
-l символическая ссылка
-p pipes (конвейер)
-S socket (гнездо)
-b специальное блочное устройство
-c -//– символьное -//-
-t указатель на уст-во tty
-u установлен бит setuid
-g -//– setgid
-k -//– sticky
-T текстовой файл
-B двоичный
-M «возраст» файла в днях на момент старта скрипта
-A дней с последнего чтения
-C дней с последней модификации inode
abs выражение
Абсолютное значение выраженияaccept NEWSOCKET, GENERICSOCKET
Окрыть новый сокет по внешнему запросу. Аналогично системному вызову accept(). Возвращает адрес или false в случае неудачи.alarm секунды
Послать сигнал SIGALARM текущиму процессу по истечении указанного промежутка времени. Не допустимо делать несколько вызовов одновременно в одном промежутке времени.Возвращает остаток времени предыдущего счетчика.
atan2 Y, X
Арктангес отношения Y к X в пределах от -pi до +pi.bind сокит, имя
Назначить сетевой адрес сокиту. Подобно системному вызову bind. Возвращает true в случае успеха и false иначе.Имя – пакетный адрес сокита.
binmode файл
Открыть файл для двоичного (binary) режима доступа.В обычном режиме при вводе символы CR LF транслируются в LF, а при выводе LF транслируется в CR LF.
функция bless
bless ссылка, классbless ссылка
Данная функция определяет что объект указанный ссылкой принадлежит классу. Если класс не указан то он относится к текущему классу. Обычно это последний оператор в конструкторе объекта.
Необходимо обязательно указывать имя класса если определяемый объект может наследоваться классом-потомком.
функция caller
caller выражениеcaller
Возвращает контекст вызова текущей подпрограммы.
В скалярном контексте true если это подпрограмма или процедура вызванная операторами eval() или require() и false – иначе.
В списковом это список ($package, $filename, $line)
где
$package – имя пакета
$filename – имя файла пакета
$line – номер строки откуда был сделан вызов.
Если указано выражение то возвращается список:
($package, $filename, $line, $subroutine, $hasargs, $wantargs)
Выражение определяет «глубину» вложенности просмотра стека вызовов.
$subroutine – имя подпрограммы
$hasargs – имеющиеся аргументы
$wantargs – необходимые аргументы
Применение данной функции в DB пакете возвращает более детальную информацию. К списку аргументов добавляется список @DB::args.
chdir выражение
Перейти в директорию указанную выражением. Если выражение отсутсвует то перейти в «домашнию» директорию.Возвращает true в случае успеха и false – неудачи.
chmod список
Изменить права доступа к файлам указанным в списке.Первый элемент в списке – числовое ,обычно восьмеричное значение прав.
Возвращает количество файлов которым были изменены права.
Пример:
chmod 0666 'f1', 'f2', 'f3';
chomp переменная
chomp списокchomp
Удаляет в конце строки символ указанный переменной $/.
Обычно это 'LF'. Возвращает количество удаленных символов. Если переменная не указана то используется переменная $_.
Если указан список то обрабатывается каждая строка списка и возвращается общее количество удаленных символов.
chop переменная
chop списокchop
Полностью аналогично функции chomp но всегда удаляет последний символ строки.
chown список
Изменить «владельца» и «группу» файлов списка.Первый элемент – номер нового владельца, второй номер новой группы а далее список файлов.
В большинстве Юникс-систем вы не сможете сменить владельца если вы не суперпользователь, но можете изменить группу если это одна из ваших «вторичных» групп.
chr число
Возвращает символ с указанным кодом кодировки.chroot директория
Сделать «корневой» указанную директорию.«Корневая» – значит внутри программы на нее можно ссылаться как '/'.
close файл
Закрыть открытый файл или поток. Можно не использоватьесли один и тот же файл открывается повтортно т.к. он будет автоматически закрываться новым вызовом open().
closedir директория
Закрыть директорию открытую функцией opendir().connect сокит, имя
Связаться с удаленным сокитом. Данная функция подобна системному вызову connect(). Возвращает true в случае успехаи false при ошибке.
cos выражение
Косинус выражения в радианах.crypt текст, salt
Шифрация текта. Аналогично системному crypt().dbmclose хеш
Закрывает связь между хеш и базой данных.dbmopen хеш, база, режим
Ассоциировать указанный хеш и базу в определенном режиме.Дело в том что в Перл реализован очень удобный механизм работы с базами данных типа dbm, ndbm, sbdm, gdbm и Berkeley DB. Для этого нужно связать (открыть) базу под именем хеша. Вся работа с записями базы выполняется так будто это обычный хеш (ассоциативный массив).
Более подробно смотрите описание функции AnyDBM().
define выражение
Возвращает true если значение определено (существует) и false если нет. Многие операции завершаются не определенным значением, например чтение после конца файла, использование не определенных переменных, системные ошибки и т.д.Данная функция позволяет различать нулевое и не определенные значения, определенность или не определенность функций или ссылок. При использовании определенности ключа в хеше она возвращает определен данный ключ или нет но не существует он или нет.
delete выражение
Удалить значение из хеша. Возвращает удаляемое значение или не определенность если ни чего не удаляется.Удаление из массива окружения $ENV{} – изменяет окружение.
Удаление из хеша связанного с базой данных – удаляет запись в базе данных.
die список
Если программа не была запущена из eval() данная функция выводит список в поток STDERR и завершает работу программы с кодом из переменной $!. Если $! содержит 0 то с кодом ($? >> 8). Если и это 0 то с кодом 255.При вызове из eval() сообщение об ошибке заносится в переменную $@ и eval() завершается с неопределенным значением. Это позволяет отробатывать ошибочные ситуации не завершая головной модуль.
Если строка из списка не завершается символом '\n' то дополнительно печатается номер строки скрипта откуда вызвана функция и номер входной строки исли таковой имеется.
do BLOCK
Это не совсем функция. Здесь возвращается значение последнего оператора блока. Когда используется циклический модификаторBLOCK исполняется перед проверкой условия цикла в отличии от обычных циклов.
do подпрограмма
Устаревший метод вызова подпрограмм.do выражение
Значение выражения воспринимается как имя файла Перл скрипта.Изначально это применялось для включения подпрограмм библиотеки.
Сейчас правильней использовать вызовы use() и require() которые обеспечивают контроль ошибок и завершения.
dump метка
Выполнние «дампа» текущей памяти. Применялось для возможности исрользовать программу undump что бы включить текущий исполняемый код в программу после инициализации всех переменных.Выполнение этой новой программы будет начинаться оператором goto метка. Если метка опущена то запуск сначала.
Внимание! Файлы открытые до момента дампа не будут открытыми
в момент исполнения новой программой.
each хеш
Возвращает 2-элементный массив. Первый элемент – ключ второй – значение следующего элемента хеша. Позволяет «просматривать» все значения хеша в определенном порядке. Сброс переменной цикла происходит только после прохождения всего массива.eof()
eof файлeof()
eof
Возвращает 1 если выполняется чтение после конца или чтение из не открытого файла. Аргументом должно быть выражение возвращающее существующий указатель файла. Данную функцию нельзя использовать для чтения файлов открытых как терминалы.
Если аргумент не указан то используется последний читаемый файл.
Использование в форме eof() целесообразно применять в циклах while(<>) для определения конца только последнего файла из
списка. Применяйте eof(ARGV) или eof для определения конца каждого файла из списка.
eval выражение
eval выражениеeval блок
Выражение сканируется и выполняется как обычная Перл программа.
Это делается в контексте текущей программы поэтому можно использовать уже определенные переменные и подпрограммы.
Ворзвращается результат последнего оператора в блоке или значение оператора return. Если обнаружится синтаксическая ошибка или выполнится оператор die возвращается не определенное значение а переменная $@ содержит сообщение об ошибке. Если ошибки не было то $@ содержит нулевую строку. При отсутсвии аргумента берется значение переменной $_.