使用Perl习语$ /和q || 以块方式读取文本文件

Question

我试图理解一些用于逐块读取文本文件的Perl代码.

文本文件MYFILE如下所示:

First block
First Line: Something in here
Second Line: More here
Third Line: etc.

Second block
First Line: Something in here
Second Line: More here
Third Line: etc.

代码用于提取找到正则表达式的块的行(并且它工作正常,我只想了解它).

这是我不理解的代码的一部分:

local $/ = q||;
while (<MYFILE>) {
    do something;
}

有人可以向我解释这条线路local $/ = q||;在做什么吗？

Answer 1

$/是输入记录分隔符."这影响了Perl关于"线"是什么的想法.将其设置为空字符串,即''导致空行拆分记录.q||符号引用管道内的东西所以q||是相同的''.您可以使用带有q前缀的各种分隔符:q(), q//也是相同的.