Question

perl在往文件写入时，是不是只有在close句柄之后才会真正写入到文件中去呢？为什么在close句柄前，我用

文本编辑器打开，并看不到输入的内容。如何能够在文本编辑器中实时的看到打印的内容呢？谢谢。

Answer 1

是的. 在 close 之前, 你要写入的东西都 buffer 起来了.
要实时看到, 你有两个方案

方案1.
my $file = "somefile.txt";
sub Write {
open F, ">>$file" or die "$! $file error";
print F @_; close F;
}
Write ($_) for ( 1..10000 ) ;

__END__

方案 2.
open F, ">file.txt";
syswrite (F, "...." ) ;
close F;
__END__

perldoc -f syswrite
要留意 offset , length 的应用...