本文出自:www.zdnet.com.cn 作者:Nathan Torkington
如果你调用,返回文件中剩余的记录。如果你处于文件尾,则返回空表:
@records = ;
if (@records) {
print ""There were "", scalar(@records), "" records read.
"";
}
在下面的一步中,进行赋值和测试两项工作:
if (@records = ) {
print ""There were "", scalar(@records), "" records read.
"";
}
chomp() 也可适用对数组操作:
@records = ;
chomp(@records);
对于任何表达式,都可以进行chomp 操作,故你可以在下面的一步中这样写:
chomp(@records = );
什么是记录?
记录的缺省定义为:“行”。
记录的定义由$/ 变量控制的,该变量存放所输入的记录的分隔符,因为换行符 字符(根据定义!)是用来分隔行的,故其缺省值为串“
”。
例如,你可以用任何你想要替换的符号来代替“
”。
$/ = "";"";
$record = ; # 读入下一个用分号分隔的记录
$/可以取其它两个有趣的值:空串("""") 和undef。