为了账号安全,请及时绑定邮箱和手机立即绑定

请问有大佬知道在perl 中 $/ 代表了什么意思?

请问有大佬知道在perl 中 $/ 代表了什么意思?

POPMUISE 2021-09-07 07:07:14
local $/ = ">"起到什么改变?

3 回答

?
慕桂英546537

TA贡献1848条经验 获得超10个赞

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

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


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

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

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

123local $/; # enable "slurp" modelocal $_ = ; # whole file now heres/\n[ \t]+/ /g;

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

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

因此这段 代码:

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

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

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


查看完整回答
反对 回复 2021-09-13
?
慕姐8265434

TA贡献1813条经验 获得超2个赞

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

查看完整回答
反对 回复 2021-09-13
?
哔哔one

TA贡献1854条经验 获得超8个赞

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

查看完整回答
反对 回复 2021-09-13
  • 3 回答
  • 0 关注
  • 287 浏览
慕课专栏
更多

添加回答

代码语言

举报

0/150
提交
取消
意见反馈 帮助中心 APP下载
官方微信