perl读写文件发生的错误！

在一个perl程序中，需要检测一个文件是否存在，然后重新创建一个，然后写入数据，调试过程中，出现如下错误提示：

print() on closed filehandle （后略...）

找来找去是这样的问题：

open myFile，“xxx.txt”；
open myFile，“>xxx.txt”;

目前感觉对于文件是这样的，需要读写，你再创建句柄，否则还是不创建的好。
导致上面的提示，打开关闭文件太多，导致头晕，出现的错误，耗了我半天。