作者DarkKiller (System hacked)
看板Perl
标题Re: [问题] open 档案的问题
时间Sun Oct 23 22:11:28 2011
另外要提的是，可以用 IO::File，避免全域变数 FH 的产生...
my $fh = IO::File->new($filename, 'r');
while (<$fh>) {
# ...
}
$fh->close;
※ 引述《aleelyle (lyle)》之铭言：
: 最近从java跳回perl突然发现的问题
: open(FH,"+>", $filename) || die "Can't open file $filename : $!\n";
: print FH $xxxx;
: close(FH);
: 1.请问print那行有可能会fail吗
: 如果是，请问如何处理？
直觉可以想到的是 $filename 是特殊档案 (/dev/xxx 或是 Windows 下 PRN
之类的保留字)
: 2.在open和close间如果程式突然exit了，请问会发生什麽事？
: (file handle 会被释放掉吗？还是要等作业系统回收？)
: 感谢解答
会回收...
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 210.242.135.97
1F：推 CindyLinz:我都用 open my $f, $filename; 来避免全域变数耶~ 10/24 08:30
2F：推 aleelyle:感谢解答 10/24 09:17