Строковые операторы в Perl

Perl может оперировать не только числами, но и строками. Первым строковым оператором, который мы рассмотрим, является оператор контонации (.). Просто точка. Этот оператор берёт строку, находящуюся слева от него, и строку и возвращает строку, объединяющую предыдущие две, например:

$a = "Привет, мой Свет!";
$b = "Как я рад тебя видеть";
$c = $a . $b;

В этом примере переменные $a и $b имеют простые строковые значения. В последней строке переменной $c присваивается значение Привет, мой Свет! Как я рад тебя видеть, при этом значения переменных $a и $b не изменяются.

Контонацию строк можно выполнить и другим способом. Раньше мы уже говорили (а именно в статье "Строковые литералы : основы"), что внутри строк, заключённых в двойные кавычки, Perl "выискивает" имена переменных. Найденные переменные интерпритируются. Это означает, что имя переменной внутри строки в двойных кавычках заменяется реальным значением этой переменной, например:

$name = "Джон";
print "Привет, $name";

В этом примере Perl ищет в строке в двойных кавычках имена переменных, находит имя $name и подставдяет вместо него строку Джон. Этот процесс называется интерпритацией значения переменных. Для того чтобы переменные не интерпретировались, нужно заключить строку в одинарные кавычки (тогда Perl вообще никак не будет анализировать эту строку) или поставить обратную косую черту перед идентификатором переменной, например:

$name = "Ringo";
print 'Я использую переменную $name'; # Не будет печататься слово "Ringo"
print "Я использую переменную \$name"; # Также не будет печатать слово "Ringo"

Оба оператора print из предыдущего примера напечатают строку Я использую переменную $name, при этом переменная $name не будет интерпретирована. Итак, оператор контанации можно заменить строками в двойных кавычках следующим образом:

$fruit1 = "яблоки";
$fruit2 = " и груши";
print "$fruit1 $fruit2";

Там, где Perl не может чётко выделить имя переменной из остальной части строки, заключите имя переменной в фигурные скобки {}. Подобный приём позволяет Perl легко определить имя переменной, например:

$name = "Thurs";
print "I went to the fair on ${$name}day";

Без таких скобок не понятно, какую переменную должен интерпретировать Perl - $date или $dateday. Фигурные скобки однозначно указывают, что $date.

Следующим строковым оператором является оператор повторения x. В операторе x указывается два аргумента - строка, которую необходимо повторить, и число повторений. Например:

$line = "-" x 70;

В этом примере символ "-" повторяется 70 раз оператором x. Результат сохраняется в переменной $line.