Переменные-строки


# Инициализация
$a = "string";
$a = q(Quoted 'string');
$a = qq/Quoted "string"/;

# Повторения строки
$a = $a*5;

# Длинные строки
$s = <<EOF;
  long string
EOF

($s = <<EOF) =~ s/^s+//gm;
  long string
EOF

print length(<<"EOF");
  long string
EOF

print length <<"EOF";
  long string
EOF

# Интерполяция строк

$s = "Test $a";
$s = "Test @a";
$s = "Test ${($n+1)}";
$s = "Test @{[split //,$a]}";

# Работа со строками

$i = index $string, $substr, $startpos;

$i = rindex $string, $substr, $startpos;

$s = substr($string, $startpos, $length);

substr($string, $startpos, $length) = $s;