perl - 如何更改 Storable 中的默认文件权限？

Question

使用Storablestore中的功能时，我可以以某种方式更改默认文件权限吗？

Answer 1

对此有几种不同的方法。（当然有；它是 Perl :-)）

第一个选项：用于sysopen()创建具有指定权限的文件，然后使用store_fd()and fd_retrieve()。另请参阅Perl open() 教程，特别是“Permissions a la mode”部分。

第二个选项：用于umask()限制文件权限。如果您正在处理多个文件，请不要忘记将其设置回其原始值。

第三个选项：用于chmod()在预先存在的文件上手动设置文件权限。

第一个选项在概念上更好，因为它允许用户通过自己控制 umask 来进一步收紧权限。（在 shell 提示符下尝试help umask。那里的 umask 设置适用于从 shell 运行的所有程序。再次，请参阅perlopenut。）