Question

perl 中 $/ 代表了什么意思？

local $/ = ">"

起到什么改变？

Answer 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 以及 $.。

Answer 2

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

Answer 3

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