Perl简单文本读写及注释

这是网上广泛流传的perl文本读写方法, 但是有些没有讲清楚, 所以我单独加了注释.

1、文件名前面没有">"表示读文件

open(FILE,"C:\test.txt");
while(<FILE>)
{
        chomp;
        print "$_\n";
}
close(FILE);

2、文件名前面有一个">"表示写文件，并覆盖原有内容

open(FILE,">C:\test.txt");   ##这个地方要注意的是,　执行这一句,实际上已经重建该文本, 之前的内容在这一步就已经清空. 

##后面想要再使用FILE对变量赋值就会出现问未初始化问题.

print FILE "大家好\n";
close(FILE);

3、文件名前面有两个">"表示在这个文件后面追加内容
open(FILE,">>C:\test.txt");
print FILE "大家好\n";
close(FILE);;