Операции конкатенации и повторения
Бинарная операция конкатенации,
или соединения объединяет два строковых операнда в одну строку.
Знаком этой операции служит точка ".":
"one_string"."two_string"; # Результат: "one_stringtwo_string"
В новой строке содержимое первого операнда и содержимое второго операнда соединяются
без пробела между ними. Обычно эта операция используется для присваивания переменной
некоторого нового значения. Если необходимо соединить две или более строки со
вставкой пробелов между ними, то следует воспользоваться операцией join (см.
гл. 10 "Работа со строками"). Можно, однако, для соединения строк
со вставкой пробела (или любого другого символа между ними) воспользоваться
свойством подстановки значения скалярной переменной в строку, ограниченную двойными
кавычками: $sl = "one_string"; $s2 = "two_string"; $s =
"$sl $s2"; # Значение $s: "one_string two_string"
Можно использовать операцию конкатенации строк последовательно в одном выражении
для соединения нескольких строк:
$sl = "one";
$s2 = "two";
$s3 = "three";
$s = $sl.$s2.$s3; # Значение $s: "onetwothree"
Операцию конкатенации можно применять и к числовым литералам, и к числовым данным,
хранящимся в скалярных переменных. Результатом будет строка, содержащая символьные
представления двух чисел:
$nl = 23.5;
$n2 = Зе01;
$n = $nl.$n2; t Значение $n: "23.530"
$n = 23.5.3е01; # Значение $n:'"23.530"
Заметим, что последний оператор выглядит несколько экзотично и его семантика
не определяется с первого взгляда.
Для работы со строками в языке Perl предусмотрена еще одна операция — повторение
строки х (просто символ строчной буквы "х"). Эта бинарная операция
создает новую строку, в которой строка, заданная левым операндом, повторяется
определяемое правым операндом количество раз:
"аА" х 2; # Результат: "аАаА"
10.0 х "3"; # Результат: "101010"
101е-1 х 3; # Результат: "101010" $n = 010;
$n х 2; # Результат: "88"
10.1 х 3.9; # Результат: "10.110.110.1"
"101е-1" х 2; # Результат: "101е-1101е-1"
Обратим внимание, что в качестве левого операнда можно использовать и числовые
литералы, и переменные, содержащие числовые данные. Правым операндом, задающим
число повторений, может быть любое число или строка, содержащая правильное десятичное
число.
Эта операция удобна, если надо напечатать или отобразить на экране монитора
повторяющийся символ или последовательность символов. Например, следующий оператор
выведет на экран монитора строку, целиком состоящую из символов подчеркивания:
print "_" х 80;
Левым операндом этой операции может быть список, заключенный в круглые скобки.
В этом случае операция повторения х работает как повторитель списка, т. е. ее
результатом будет список, в котором список левого операнда повторяется заданное
правым операндом количество раз:
(1) х 3; # Результат: (1, 1, 1) (1, 2) х 2; # Результат: (1, 2, 1, 2)
Это пример использования операции Perl в разных контекстах: скалярном и списковом
(о контекстах мы поговорим ниже в этой же главе). Операция повторения в списковом
контексте удобна для задания массива скаляров с одинаковыми значениями элементов
или групп элементов:
@аггау = ("а", "b") х 2; # Результат: Оаrrау = ("а",
"Ь", "а", "Ь") @аrrау = ("а") х 3; #
Результат: @аrrау = ("а", "а", "а")
Аналогично, эту операцию можно использовать для инициализации хеш-массива одинаковыми
значениями:
@keys = ( one, two, three); # Определение ключей хеш-массива. @hash{@keys} =
("а") х @keys; # Инициализация значений хеш-массива.
В последнем операторе присваивания в правой части массив скаляров @keys используется
в списковом контексте и представляет список своих значений, тогда как в левой
части он используется в скалярном контексте и имеет значение, равное числу своих
элементов.
Знак операции повторения х 'следует отделять пробелами от операндов, так как
иначе он может быть воспринят интерпретатором, как относящийся к лексеме, а
не представляющий операцию повторения. Например, при синтаксическом разборе
строки
$nx$m;
интерпретатор определит, что в ней идут подряд две переменные $nх и $m, a не
операция повторения содержимого переменной $п, что приведет к синтаксической
ошибке.