现在的位置: 首页 > 综合 > 正文

perl中seek函数的用法

2013年04月15日 ⁄ 综合 ⁄ 共 361字 ⁄ 字号 评论关闭

seek 设置文件的当前位置!

当一个文件非常大时可以从指定位置读起。
seek FILEHANDLE,POSITION,WHENCE

成功返回真,失败返回假。
POSITION 是读入的新位置(字节)。
WHENCE有3个值,0表示新位置是POSITION,1表示当前位置加上POSITION,2表示文件尾加上POSITION
例如:从file.txt的12字节开始读起并打印出来。
open (FILEHANDLE,"<file.txt") or die "cannot open file.txt";
seek FILEHANDLE,12,0;
while (<FILEHANDLE>){
print;
}
close (FILEHANDLE);

tell函数能针对常规文件返回其文件句柄的当前位置,该位置可作为调用seek函数的参数,以便移动到文件内的某个位置上。

抱歉!评论已关闭.