perl - 使用您将要编辑的 perl 脚本备份配置文件的理想方法是什么

Question

我正在尝试创建一个操作配置文件的脚本。所以我需要备份现有的配置文件，万一在操作过程中出现问题，备份文件的内容应该替换配置文件的内容。同样，当回滚作为脚本的参数给出时，备份文件的内容应该替换配置文件。

Answer 1

通常我会创建一个名称基于原始文件名的文件：

my $file = 'input.txt';
my $new_file = "$file.new";

开始从输入文件中读取行，并在将它们写入新文件之前根据需要对其进行操作。

当您到达输入文件的文件末尾时，将它们都关闭。将输入文件重命名为"$file.old"，然后将新文件重命名为旧名称$file。

您希望尽可能长时间地保持原始文件完好无损，以便在处理过程中出现故障时保持可用。

如果您必须回滚，则在处理完成后反转重命名过程。如果处理没有完成，只需删除新文件。