如果你调用，返回文件中剩余的记录。如果你处于文件尾，则返回空表：
@records=;
if(@records){
PRint"Therewere",scalar(@records),&qu
来源gaodai.ma#com搞##代!^码网
ot;recordsread.\n";
}
在下面的一步中，进行赋值和测试两项工作：
if(@records=){
print"Therewere",scalar(@records),"recordsread.\n";
}
chomp()也可适用对数组操作：
@records=;
chomp(@records);
对于任何表达式，都可以进行chomp操作，故你可以在下面的一步中这样写：
chomp(@records=);
什么是记录？
记录的缺省定义为：“行”。
记录的定义由$/变量控制的，该变量存放所输入的记录的分隔符，因为换行符字符(根据定义！)是用来分隔行的，故其缺省值为串“\n”。
例如，你可以用任何你想要替换的符号来代替“\n”。
$/=";";
$record=;#读入下一个用分号分隔的记录
$/可以取其它两个有趣的值：空串("")和undef
以上就是Perl的经典用法:读入多个记录的内容，更多相关文章请关注搞代码！
搞代码网（gaodaima.com）提供的所有资源部分来自互联网，如果有侵犯您的版权或其他权益，请说明详细缘由并提供版权或权益证明然后发送到邮箱[email protected]，我们会在看到邮件的第一时间内为您处理，或直接联系QQ：872152909。本网站采用BY-NC-SA协议进行授权
转载请注明原文链接：Perl的经典用法:读入多个记录
转载请注明原文链接：Perl的经典用法:读入多个记录
