Perl是否具有Python的多行字符串？

Question

在Python中,您可以使用docstring创建一个这样的多行字符串

foo = """line1
line2
line3"""

在Perl中有相同的东西吗？

Answer 1

正常报价:

# Non-interpolative
my $f = 'line1
line2
line3
';

# Interpolative
my $g = "line1
line2
line3
";

Here-docs允许您将任何标记定义为引用文本块的结尾:

# Non-interpolative
my $h = <<'END_TXT';
line1
line2
line3
END_TXT

# Interpolative
my $h = <<"END_TXT";
line1
line2
line3
END_TXT

正则表达式样式引用运算符允许您使用几乎任何字符作为分隔符 - 就像正则表达式允许您更改分隔符一样.

# Non-interpolative
my $i = q/line1
line2
line3
/;

# Interpolative
my $i = qq{line1
line2
line3
};

更新:更正了here-doc令牌.

Answer 2

Perl没有重要的语法垂直空白,所以你可以这样做

$foo = "line1
line2
line3
";

这相当于

$foo = "line1\nline2\nline3\n";

Answer 3

是的,这是一个here-doc.

$heredoc = <<END;
Some multiline
text and stuff
END