日志
perl语言中的read函数用法
|
调用语法 read (filevar, result, length, skipval);
解说 read函数设计得与UNIX的fread函数等效，可以读取任意长度的字符（字节）存入一个简单变量。其参数有四个：
1、filevar：文件变量
2、result：存贮结果的简单变量（或数组元素）
3、length：读取的字节数
4、skipval：可选项，指定读文件之前跳过的字节数。
返回值为实际读取的字节数，如果已到了文件末尾，则返回零，如果出错，则返回空串。同时还要注意该函数类似于钻石操作符<>，每次读数据都是读取上一次读数据的位置的下一个位置开始，而不是每次读数据都从文件开头位置开始！如果想要每次都从文件开头读取，可以使用文件重定向符seek函数，如下所示：
- use strict;
- open FH, "<ttt.pl";
- my $buf;
- while( seek(FH, 0, 0 ), read( FH, $buf, 1 ) ){ print $buf; }
/1 
eetop公众号
创芯大讲堂
创芯人才网