这是网上广泛流传的perl文本读写方法,但是有些没有讲清楚,所以我单独加了注释.
open(FILE,"C:\test.txt");while(<FILE>)
{
chomp;
print "$_\n";
}
close(FILE);
2、文件名前面有一个">"表示写文件，并覆盖原有内容
##这个地方要注意的是, 执行这一句,实际上已经重建该文本,之前的内容在这一步就已经清空.
##后面想要再使用FILE对变量赋值就会出现问未初始化问题.
print FILE "大家好\n";close(FILE);;