| Perl 的经典用法：读入多个记录 |
|
作者：-①℃冰洁… 文章来源：本站原创 点击数： 更新时间：2007-4-26 17:51:11  |
如果你调用，返回文件中剩余的记录。如果你处于文件尾，则返回空表：
@records = ;
if (@records) {
print "There were ", scalar(@records), " records read.\n";
}
在下面的一步中，进行赋值和测试两项工作：
if (@records = ) {
print "There were ", scalar(@records), " records read.\n";
}
chomp() 也可适用对数组操作：
@records = ;
chomp(@records);
对于任何表达式，都可以进行chomp 操作，故你可以在下面的一步中这样写：
chomp(@records = );
什么是记录？
记录的缺省定义为：“行”。
记录的定义由$/ 变量控制的，该变量存放所输入的记录的分隔符，因为换行符 字符(根据定义！)是用来分隔行的，故其缺省值为串“\n”。
例如，你可以用任何你想要替换的符号来代替“\n”。
$/ = ";";
$record = ; # 读入下一个用分号分隔的记录
$/可以取其它两个有趣的值：空串("") 和undef。
|
| 文章录入：范有昌 责任编辑：范有昌 |
|
上一篇文章： 用Perl 写不刷屏的聊天室原理分析
下一篇文章： 功能丰富的 Perl: 遗传算法仿真多细胞机体 |
| 【字体：小 大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】 |
用户登录 
新用户注册 
网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）
