服务器技术之Perl中二进制文件的读写

 

在Perl中，二进制文什的读写与文本文件是不同的，这里使用的函数是sysread和syswnte，其格式为：

 

$result - sysread( Filehandle, $var, length[, offsetl]),

 

$result= syswrite(Flehandle, $var, length[, offsetl]);

 

在使用二进制读写时，用户必须自行维护文件指针，即当前文件读写数据的偏移量。Perl使用下列函数完成这个工作；

 

$fesult= seek (Filehandle, position' base),

 

$result= IeII(Filehandle)；

 

Sresul=eof (Filehandle)；

 

seek函数类似于C语言的库函数fseek，用于设置文件指针到指定的位置，而tell函数用于返同当时的文件指针的值，eof用于测试是否达到文件尾部。