前端之家收集整理的这篇文章主要介绍了
如何从Perl设置文件权限？，
前端之家小编觉得挺不错的，现在分享给大家，也给大家做个参考。
我正在编写一个
生成
Bash脚本的Perl脚本.我使用open()模式>将所有
内容输出到新
文件.标准的东西：
open (FILEOUT,">","rename.sh") or die "Can't create rename.sh";
所得到的.sh文件是只读的,八进制值为444.在perldoc中,我可以添加到> (打开(FILEOUT,“>”,“rename.sh”))使新创建的文件可读写,或666.
有没有办法使新的文件可执行(755或其他任何东西)使用open()？如果没有,为新文件设置文件权限的最佳方法是什么？
你会想要
chmod这样的
文件.
chmod 0755,$filename;
#or
chmod 0755,$fh;
或者,如果您使用sysopen并适当设置umask,则可以不使用chmod.
原文链接：https://www.f2er.com/Perl/171696.html
