推 CindyLinz:我都用 open my $f, $filename; 來避免全域變數耶~ 10/24 08:30
推 aleelyle:感謝解答 10/24 09:17
另外要提的是，可以用 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