当前位置:主页>Perl教程>文章内容
Perl的经典用法:读入段落
来源: 作者: 发布时间:2007-04-29  

$/=""的写法是用来指示Perl读入段落的,段落是由两个或两个以上的换行符构成的文本块。这不同于设置为"\n\n",后者仅读入由两行组成的文本块。在这种情况下,将出现这样一个问题:如果有连续的空行存在,例如“text\n\n\n\n”,你既可以把它解释为一个段落("text"),也可以解释为两个段落("text",后面跟两个换行符,以及一个空段落,后面跟两个空行。)

在读入文本时,第二个解释用途不大。如果你正在读的段落出现上述情况,你不必过滤出“空”段落。

$/="\n\n";

while(){

chomp;

nextunlesslength;#跳过空段

#...

}

你可以把$/设置为undef,它用于读入后面跟着两个或多个换行符组成的段落:undef$/;

while(){

chomp;

#...

}

读入整个文件

$/的其它有趣的值为undef。如果设置为该值,就将告诉Perl,读命令将把文件的剩余部分作为一个串返回:

undef$/;

$file=;

因为改变了$/的值,将会影响以后的每次读操作,而不仅是下一个读操作。通常,你需要将该操作限制在局部。通过下面的例子,可以把文件句柄的内容读入到一个串中:

{

local$/=undef;

$file=;

}

记住:Perl变量可读入很长的串。尽管你的文件大小不可以超出你的虚拟内存容量的限度,你仍可以读入尽可能多的数据。



  上一篇:Perl的经典用法:读入多个记录   下一篇:Perl的经典用法:用正则表达式对文件进行操作
 
  相关文章
·Perl的经典用法:读入多个记录
·Perl的经典用法:用正则表达式对文件进
·Perl的经典用法:读入单个记录
·用Perl饼来替换文件中的字符串
·Perl的经典用法:用Sysopen()进行更多的
·PERL下的正则表达式
·执行mod_perl模块
·proftpdlog文件实时分析,动态封禁/解
·Perl的经典用法:用Open()函数打开文件
·ADODB与PearDB的兼容部分
·使用perldoc找文档
·LINUX
 
【关闭窗口】
推荐本站资源
最新文章