perl 文件[二]

错误输出函数与错误变量

open() || die "error$!"; 成功时不执行die，失败时执行  （||或操作）

die($errstr);向STDERR输出指示错误信息的串,然后退出程序。

warn($errstr);向STDERR输出信息,不退出程序

$! 最后一次错误的信息。与die,warn 结合使用。

die($str)中$str中最后不是\n时,输出自动添加at程序名line行号。

如die("can't open");输出can't open at myprog line 13

加上\n如“can't open\n"时没有添加的信息。


open (FD,"5.pl") || die ;
@line=<FD>;
foreach (@line) {
print $_;
};
print "xxxxxxxx";

die 直接退出


open (FD,"5.pl") || warn($errstr); ;
@line=<FD>;
foreach (@line) {
print $_;
};
print "xxxxxxxx";

warn($errstr);向STDERR输出信息,不退出程序


文件缓冲:
close(F);最后要关闭文件。隐含关闭文件,重打开已经打开的,先关闭再打开,程序退出自动关闭。真正写文件。


文件缓冲:通常为代缓冲的文件写。写文件时,系统先写到称为文件缓冲区的内存中,缓冲满再真正写入磁盘。一般在关闭时缓冲内容