perl open函数问题

open FH,'<E:\perl1.txt' or 信扮die ("$!")

应该改成

open FH, '<', 'E:/perl1.txt' or die ("$!")

过去，open函数可以像你那样使用，但会被人恶意使用，造成严重后果。所以Perl为了防止open函数的这一漏洞，要求三个参数。具体原因可以参考perl的open函数文档梁慎。橡坦敬

$file="name.txt"

open FILE, ">$file" or warn"can't open the file"

#以写的方式打开文件，会悉桥覆盖掉原来的内容，谨慎 *** 作

@new=qw/how are you/咐汪##数组衡陆仔new存放你的新数据

print FILE @new

close FILE

---