首 页 | 精品电影 | 音乐天堂 | 在线游戏 | Flash MTV | 三湘书屋 | 幽默笑话 | 三湘图库 | 美女写真 | IT知识库 | QQ贴图 | 加入书签

｜网页制作｜网络编程｜图形图象｜操作系统｜冲浪宝典｜软件教学｜网络安全｜认证考试｜通信技术｜电子商务｜业内动态｜书籍教程｜原码｜

最近更新 文章分类 多媒体类 精品软件

 本站搜索：
您的位置：三湘时空 -> IT知识库 -> 文章分类 -> 其它编程 -> Perl的经典用法:读入单个记录
Perl的经典用法:读入单个记录


文章类别：其它编程 来源： 作者： 发表日期：2006-3-6 字体：[大 中 小]

小游戏 | 在线影院 | 幽默笑话 | 源码下载 | Flash MTV | 音乐试听 | 书屋 | 美女写真

有一个容易的方法读入filehandles：用操作符。在标量内容下，它返回文件中的下一个记录，或者返回未定义出错信息。我们可以使用它来把一行读入到一个变量中：

$line=;

die"Unexpectedend-of-file"unlessdefined$line;

在循环语句中，我们可以这样写：

while(defined($record=)){#long-winded

#$recordissettoeachrecordinthefile,oneatatime

}

因为要大量进行这样的工作，通常再进行一下简化，

把记录放到$_中，而不是$record中：

while(){

#$_每次为文件中的一个记录

}

在Perl5.004_04中，我们可以这样做：

while($record=){

#$record每次为文件中的一个记录

}

defined()将自动加上，在Perl5.004_04以前的版本中，该命令给出一个警示。要了解所用的Perl版本，可在命令行下打入：

perl-v

一旦我们读出了一个记录，通常打算去掉记录分隔符，(缺省值为换行符字符)：

chomp($record);

Perl4.0版本仅有chop()操作，去掉串的最后一个字符,不管该字符是什么。chomp()没有这么大的破坏性，如果有行分隔符存在，它仅去掉行分隔符。如果你打算去掉行分隔符，就用chomp()来代替chop()。


上一篇:在Apache服务器上运行mod_perl 下一篇:Perl的经典用法:用Sysopen()进行更多的控制
本栏目热门文章
·Discuz!论坛安装步骤图文详解 2006-5-22
·X-Space详细图文安装及常见错误解决 2006-5-22
·得心应手 X-Space下的二级域名配置 2006-5-22
·Discuz! 4.1.0 IIS Rewrite设置方法 2006-5-22
·轻松简单 X-Spacee与Discuz!论坛整合详解 2006-5-22
·Perl文件及目录操作 2006-3-6
·Shell介绍 2006-3-6
·站长手记:Discuz!4.1多论坛数据合并实战 2006-5-22
·在Authorware中控制Flash动画 2006-4-10
·Perl简单模块指南 2006-3-6
新近更新文章
·X-Space最吸引网民的八大特色 2006-6-20
·手把手学习X-Space模块设置 打造个性个人门户网站 2006-6-15
·从动网DV7.1Access转换到Discuz4.1 2006-6-15
·Windows版本Discuz!—EasyDiscuz!安装介绍 2006-6-9
·Discuz! 4.10论坛“傻瓜式”安装教程 2006-6-4
·站长网友最满意的6大X-Space功能 2006-5-28
·X-Space技巧:如何在个人博客设置音乐播放 2006-5-28
·来！把我的Blog数据转移到X-Space里 2006-5-22
·X-Space详细图文安装及常见错误解决 2006-5-22
·得心应手 X-Space下的二级域名配置 2006-5-22
首 页 | 软件发布 | 广告联系 | 下载帮助 | 意见反馈 | 网站地图
　 CopyRight? 2002-2004 WWW.SXSKY.NET? All Rights Reserved
三湘时空 站长QQ：82675303 Email: