在Perl中,如何将生成的文件标记为可执行文件?

M. *_*its 0 perl executable file

在我的perl脚本中,我创建了一个shell脚本(用于对长模拟的结果进行后处理).我想将此文件标记为可执行文件.

$fileName = 'postProcess.tcsh';
Run Code Online (Sandbox Code Playgroud)

显然,我可以做到以下几点:

system("chmod +x $fileName");
Run Code Online (Sandbox Code Playgroud)

但我很好奇是否有一个避免系统调用的解决方案.换句话说,文件模块中是否有方法?你说什么僧人?

dgm*_*ltn 11

你可以使用Perl的内置chmod函数:

chmod 0755, $fileName;
Run Code Online (Sandbox Code Playgroud)