通过不使用转义序列格式化在 perl 中打印段落

Question

我正在使用现有的 Perl 子例程打印如下文件：

sub quit_FRM () {
print STDOUT <<QUIT_IDLE;

##-------------------------------------------------- 
## Quit idle
##--------------------------------------------------
Q idle

QUIT_IDLE

}

通过调用这个子例程，它将在标准输出上打印以下内容：

##-------------------------------------------------- 
## Quit idle
##--------------------------------------------------
Q idle

我在 google 上搜索了一段时间，但仍然没有任何线索。谁能告诉我这里的“<<”是什么？ "QUIT_IDLE" 是什么？希望我可以搜索 google 如何使用此功能。

是的，这是一个重复的问题，但是通过搜索"perl print << "并没有给出任何相关的信息，或者任何我能想到的描述这个问题的信息。

Answer 1

这叫做"here document"。请参阅 perlop 中的 <<EOF。

它也存在于其他语言中：

http://tldp.org/LDP/abs/html/here-docs.html

https://en.wikipedia.org/wiki/Here_document

通过不使用转义序列格式化在 perl 中打印段落

Print a paragraph in perl by not formatting using escape sequence

perl

verification