Владимир Маслов - Введение в Perl

Последний порядковый номер добавляется строкой " E0" которая не изменяет его значение но позволяет фиксировать последнее значение.

Пример:

@алфавит = ('a'..'z'); # Массив малых букв латинского алфавита

@цифры = (0..9); # Массив цифр

Этот оператор работает так же как и в С. Если выражение перед ' ?' истинно то выполняется аргумент перед ' :' – иначе после ' :'.

Пример:

$i = 1;

$i > 1 ? print «больше» : print «меньше»;

Результат: меньше

' =' – обычный оператор «присвоить» правое значение переменной слева Вся эта группа операторов подобна операторам С т.е.

$i += 2;

эквивалентно

$i = $i + 2;

Остальные операторы этой группы работают аналогично.

Допустимы следующие операторы:

**=

+= -= .=

*= /= %= x=

&= |= ^=

<<= >>=

&&= ||=

Приоритет всей этой группы операторов равен приоритету '='.

В скалярном контексте выполняется левый аргумент, результат игнорируется затем правый и его результат есть результат действия оператора.

В списковом контексте это разделитель элементов списка который включает указанные элементы в список.

Унарный notвозвращает противоположное значение полученное выражением справа. Он эквивалентен ' !' но имеет очень низкий приоритет.

Выполняет логическую конъюнкцию двух выражений. Эквивалентен ' &&' но имеет очень низкий приоритет и «краткость» действия. т.е если левое выражение равно false – левое не выполняется.

Выполняет логическую дизъюнкцию двух выражений. Эквивалентен ' ||', но имеет очень низкий приоритет и «краткость» действия. т.е если левое выражение равно true – левое не выполняется.

Выполняет логическое исключающие или. Всегда выполняются оба правое и левое выражение.

В Перл отсутсвуют операторы языка С такие как:

унарное & – получить адрес. Для этого применяется ' \'.

унарный * – переадресация.

(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?

Действие этого оператора аналогично /шаблон/ но выполняется до первого совпадения. Это удобно для поиска наличия какой нибудь строки в одном или множестве файлов. Это не очень удачный оператор поэтому в следующих версиях Перл его возможно не будет.

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')

Строка литералов. Не интерполируется. Внутри строки разрешается использовать \'или \\для обозначения символов 'и \.