perl 中 $⼀ 代表了什么意思?

local $/ = ">"起到什么改变?
2024年11月16日 17:59
有3个网友回答
网友(1):

$/      为输入记录分隔符,默认为换行符。该变量会影响 Perl对“行”这一概念的理解。其功能类似于 awk 中的 RS变量,在被设置为空字符串时同样会将空白行作为终止标志。(空白行不能含有任何空格或制表符。)

你可以将其设置为含有多个字符的字符串,以匹配多字符的终止标志;也可以设为"undef" 以便一直读到文件结束。


当文件含有连续的空白行时,把它设为"\n\n" 和设为 "" 有少许不同:

  • 设为 ""  会把两个或更多连续的空白行视为单个 空白行;

  • 而设为 "\n\n"  则只是盲目地假定其后输入的字符属于下一段,即使这些字符是换行符也一样。(助记:在引用诗句时会用 /作为行间的分隔。)

local $/; # enable "slurp" mode
local $_ = ; # whole file now here
s/\n[ \t]+/ /g;

切记:$/ 的内容是一个字符串,而不是正则表达式。

  • 将 $/设为整数、存有整数的标量或可转换成整数的标量这些值的引用时,Perl会尝试读入记录而不是行,最大记录长度就是引用的那个整数。

因此这段 代码:

local $/ = \32768; # or \"32768", or \$var_containing_32768
open my $fh, $myfile or die $!;
local $_ = ;

会从 FILE 读取一条不长于 32768字节的记录。如果你不是在读取一个面向记录的文件(或者所用的 OS没有面向记录的文件类型),那很可能每次读取都得到一整块的数据。若某条记录比你所设置的记录长度还大,就会把该记录拆成若干片 返回。

参见 "Newlines" in perlport 以及 $.。

网友(2):

它会改变你读取文件时候,对行的分隔符,一般行都是根据回车分隔,
local $/ = ">" 会根据 > 来分隔行。

网友(3):

自带的全局变量,默认值为“\n". perl中”行“的概念就由$/决定。
{
$data = "this>";
local $/ = ">";
chomp($data);
}
$data的值就是”this".