|
$/ =""的写法是用来指示Perl读入段落的，段落是由两个或两个以上的
换行符构成的文本块。这不同于设置为"\n\n"，后者仅读入由两行组成的文本块。
在这种情况下，将出现这样一个问题：如果有连续的空行存在，例如“text\n\n\n\n”，
你既可以把它解释为一个段落 ("text")，也可以解释为两个段落 ("text", 后面
跟两个换行符，以及一个空段落，后面跟两个空行。)
在读入文本时，第二个解释用途不大。如果你正在读的段落出现上述情况，你不
必过滤出“空”段落。
$/ =
"\n\n";
while
() {
chomp;
next unless length; # 跳过空段
# ...
}
你可以把 $/设置为undef，它用于读入后面跟着两个或多个换行符组成的段落：
undef $/;
while
() {
chomp;
# ...
}
读入整个文件
$/ 的其它有趣的值为undef。如果设置为该值，就将告诉Perl，读命令将把文件
的剩余部分作为一个串返回：
undef
$/;
$file =
;
因为改变了 $/的值，将会影响以后的每次读操作，而不仅是下一个读操作。通常，
你需要将该操作限制在局部。通过下面的例子，可以把文件句柄的内容读入到一个串中：
{
local $/ = undef;
$file = ;
}
记住：Perl变量可读入很长的串。尽管你的文件大小不可以超出你的虚拟内存容
量的限度，你仍可以读入尽可能多的数据。
| 