使用Perl File :: Copy函数覆盖只读文件

Question

我需要在Perl中复制只读文件。我尝试使用Perl :: Copy函数，但如果文件已存在且无法写入，则会失败。

我可以给复制功能一个强制参数吗？

我想避免在复制之前更改文件的权限或删除目标文件。

Answer 1

好像你给自己不合理的要求。我认为最好的解决方案是在复制之前删除目标文件，这应该简单如下：

unlink $dest_file if -e $dest_file;

Answer 2

没有更改权限你不能覆盖file.in perl没有功能强制你完全覆盖

Answer 3

要完成Ron答案，Perl documentation说：

  

copy不会覆盖只读文件。

这就是为什么我们需要在复制前更改权限或删除文件。