首页 | 下载中心 | 高手学院 | 视频教程 | 书籍教程 | 模板中心 | 空间评测 | 每日代理 | 站长服务 | 高手论坛 | 
Perl的经典用法:读入段落 作者:佚名    文章来源:不详    点击数:    更新时间:2005-1-30

 

$/ =""的写法是用来指示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变量可读入很长的串。尽管你的文件大小不可以超出你的虚拟内存容 量的限度,你仍可以读入尽可能多的数据。

    Perl的经典用法:读入段落 网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)  去网站高手技术论坛讨论...
文章录入:admin    责任编辑:admin         【发表评论】【告诉好友】【打印此文】【关闭窗口
  • 上一篇文章: Perl的经典用法:读入多个记录
  •         
  • 下一篇文章: Perl的经典用法:用正则表达式对文件进行操作