网络编程 | 站长之家 | 网页制作 | 图形图象 | 操作系统 | 冲浪宝典 | 软件教学 | 网络办公 | 邮件系统 | 网络安全 | 认证考试 | 系统进程
Firefox | IE | Maxthon | 迅雷 | 电驴 | BitComet | FlashGet | QQ | QQ空间 | Vista | 输入法 | Ghost | Word | Excel | wps | Powerpoint
asp | .net | php | jsp | Sql | c# | Ajax | xml | Dreamweaver | FrontPages | Javascript | css | photoshop | fireworks | Flash | Cad | Discuz!
当前位置 > 网站建设学院 > 网络编程 > Perl
Tag:注入,存储过程,分页,安全,优化,xmlhttp,fso,jmail,application,session,防盗链,stream,无组件,组件,md5,乱码,缓存,加密,验证码,算法,cookies,ubb,正则表达式,水印,索引,日志,压缩,base64,url重写,上传,控件,Web.config,JDBC,函数,内存,PDF,迁移,结构,破解,编译,配置,进程,分词,IIS,Apache,Tomcat,phpmyadmin,Gzip,触发器,socket
网络编程:ASP教程,ASP.NET教程,PHP教程,JSP教程,C#教程,数据库,XML教程,Ajax,Java,Perl,Shell,VB教程,Delphi,C/C++教程,软件工程,J2EE/J2ME,移动开发
本月文章推荐
.Perl操作mysql数据库的方法.
.Perl的经典用法:读入单个记录.
.响应头204的应用.
.构建一个Perl/CGI投票系统.
.在Apache服务器上运行mod_perl.
.Perl简介.
.LINUX.
.Perl常规表达式(1).
.使用Maypole进行快速Web应用开发.
.使用Perl连接Mysql数据库.
.Perl语言全面编译(一).
.Perl的经典用法:用正则表达式对文.
.Perl的经典用法:用Open()函数打开.
.《极限编程》前言及第一章.
.Perl语言全面编译(四).
.perl常问问题集--第一篇.
.用Perl饼来替换文件中的字符串.
.PerlCGI程式写作常问问题集(4)安.
.Perl常用系统函数.
.Perl简介.

Perl的经典用法:读入段落

发表日期:2006-3-5


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


购买网站空间(支持ASP/.NET/PHP):送域名、送邮箱、更送1G U盘
上一篇:Perl的经典用法:读入多个记录 人气:5133
下一篇:Perl的经典用法:用正则表达式对文件进行操作 人气:4331
浏览全部Perl的内容 Dreamweaver插件下载 网页广告代码 祝你圣诞节快乐 2009年新年快乐