在Perl中读取和写入文件

一旦在Perl中具有打开的文件句柄,就需要能够读取和写入信息。有多种不同的方式将数据读取和写入文件。

<FILEHANDL>运算符

从打开的文件句柄读取信息的主要方法是<FILEHANDLE>运算符。在标量上下文中,它从文件句柄返回一行。例如-

#!/usr/bin/perl

print "What is your name?\n";

$name = <STDIN>;

print "Hello $name\n";

在列表上下文中使用<FILEHANDLE>运算符时,它将返回指定文件句柄中的行列表。例如,要将文件中的所有行导入到数组中-

#!/usr/bin/perl

open(DATA,"<import.txt") or die "Can't open data";

@lines = <DATA>;

close(DATA);

getc函数

getc函数从指定的FILEHANDLE中返回单个字符,如果未指定则返回STDIN-

getc FILEHANDLE

getc

如果出现错误,或者文件句柄位于文件末尾,则返回undef。

read函数

read函数从缓冲的文件句柄中读取信息块:此函数用于从文件中读取二进制数据。

read FILEHANDLE, SCALAR, LENGTH, OFFSET

read FILEHANDLE, SCALAR, LENGTH

读取的数据长度由LENGTH定义,如果未指定OFFSET,则将数据放置在SCALAR的开头。否则,数据将放在SCALAR中的OFFSET字节之后。该函数返回成功读取的字节数,文件末尾为零,如果出现错误,则返回undef。

print 函数

对于从文件句柄读取信息的所有不同方法,写回信息的主要功能是打印功能。

print FILEHANDLE LIST

print LIST

print

打印功能将LIST的评估值打印到FILEHANDLE或当前输出文件句柄(默认为STDOUT)。例如-

print "Hello World!\n";

以上是 在Perl中读取和写入文件 的全部内容, 来源链接: utcz.com/z/337939.html

回到顶部