如何用perl打开一个txt文件并修改后覆盖原文件？

小弟最近刚学习Perl语言，想做个试验，即用perl打开一个txt文件并修改后覆盖原文件，不知哪位高人能赐教源代码，不甚感激。
print FILE @new;
这个语句就实现了将数组new的内容输入到句柄FILE，并改变了“$name.txt”的内容了吗？

$file="name.txt";
open FILE, ">$file" or warn"can't open the file";
#以写的方式打开文件，会覆盖掉原来的内容，谨慎操作
@new=qw/how are you/;##数组new存放你的新数据
print FILE @new;
close FILE;

按照以下步骤操作： 1.在文本界面输入：vi 文件名.txt 2.按下i键进入编辑模式，开始编辑文字 3.按下ESC键退出编辑模式 4.接着输入：wq 这样就完成了对文件的修改和保存！

你好！ 按照以下步骤操作： 1.在文本界面输入：vi 文件名.txt 2.按下i键进入编辑模式，开始编辑文字 3.按下ESC键退出编辑模式 4.接着输入：wq 这样就完成了对文件的修改和保存！ 如果对你有帮助，望采纳。