Perl:打开不带写缓存的文件

Question

我知道现代*nix OSes允许打开文件，这样数据就不会被缓存在系统/磁盘写缓存中，所以任何写操作都只有在数据物理写入磁盘时才会完成。

您能建议我如何在Perl中做到这一点吗？

操作系统为AIX/Solaris。

Answer 1

使用sysopen函数并将O_SYNC作为标志之一。查看系统手册页中支持的标志(man 2 open)。我知道它在Solaris10上，但不确定是不是AIX。例如：

sysopen(FH, $path, O_SYNC | O_WRONLY | O_CREAT)

有关详细信息，请参阅http://perldoc.perl.org/functions/sysopen.html。