当我从cmd运行脚本打开文件后，无法在perl脚本中再次打开文件

Question

我需要编写一个打开文件的脚本然后关闭它然后再打开它。例如：

#!/usr/bin/perl
open(File,">>test.csv");
print File "1234\n";
close(File);
open(File,">>test.csv");
print File "5678\n";
close(File);

当这个代码在eclipse上运行时，它运行正常，但是当我尝试从cmd运行脚本时;该文件仅首次打开，csv文件仅包含1234。

Answer 1

可能你会在某处保持打开文件。 要知道这种错误，你必须使用“die”命令和“open”，如下所示，

打开（文件，“＆gt;＆gt; test.csv”）||死！$ ;;

如果有的话会抛出错误（比如第1行的权限被拒绝）。 另外建议使用'use strict;'和'使用警告;'在程序顶部通知任何错误。