Perl语言文件句柄的初步理解

在执行过程中总结的几点经验：（以写入文件为例）

先看一个简单的例子：

@m=(1..10000);
open FH,'>.\ygz.txt';  #打开文件句柄FH，FH是自命名的文件句柄的名字
  print FH "@m";  #将内容写入文件句柄
close FH;  #关闭文件句柄

1.为什么要打开和关闭文件句柄？

打开文件句柄，相当于打开了一个通往外界文件的通道，可以将自定义的内容输出到文件里。关闭文件句柄，则关闭了这个通道，不能再输出内容到文件。也可以选择不关闭文件句柄，照样可以将内容输出到文件里，只不过不关闭的话，会有安全隐患，之后的程序还能继续输出内容到这个文件句柄。

2.打开和关闭文件句柄

使用’>’时，open FH … 后面跟多个print FH … 并不会依次覆盖掉之前的内容，直到执行下一次的open FH …，就会将上一次所有的文件内容全部清空并写入新的内容。其实也很好理解，当打开一个文件句柄写东西的时候，只要不关闭文件句柄，可以一直print内容到文件，当出现close文件句柄的时候，说明此次任务结束，文件写完了。（注意:如果并没有关闭文件句柄，而是直接又出现了一次open FH … ，Perl会自动关闭上次任务的文件句柄，又再次打开这个文件句柄写东西，当然，由于用的是‘>’这个覆盖式的写入操作符，所以会抹掉之前的所有内容又写入新的内容。）

例子1：

@m=(1..100);
open FH,'>.\ygz.txt';
  print FH "@m\n";
  print FH "one\n";
  print FH "two\n";
  print FH "three";
close FH;

输出的文件结果为：
1 2 3 4 5 6 7 8 9 10
one
two
three

这是一个完整的‘>’操作符写入内容并输出到文本的过程（一共写了四次并全都输出到了文本，因为是一个完整的文件句柄写入过程，并没有出现覆盖的情况。当然，如果这个程序不小心执行多遍，第二遍的写入会覆盖前一遍的写入，从效果看内容还是这些）。

例子2：

@m=(1..10);
open FH,'>.\ygz.txt';
  print FH "@m\n";
  print FH "one\n";
  print FH "two\n";
  print FH "three\n";
#close FH;
open FH,'>.\ygz.txt';
  print FH "shift\n";
  print FH "pop\n";
  print FH "unshift\n";
  print FH "push";
close FH;

输出的文件结果为：
shift
pop
unshift
push

这是两个完整的‘>’操作符写入内容并输出到文本的过程（第一次的关闭文件句柄可以省略，因为第二次打开文件句柄时，Perl会自动关闭上一个）。因为是两个完整的文件句柄写入过程，写入操作符又是‘>’，所以后一个写入覆盖了前一个写入。

3.关于 > 和 >> 的理解：

简单理解，>是覆盖式写入，>>是追加式写入。就拿前面两个例子来说，把>改成>>后，例子2会将两个写入过程的内容都依次输出到文本。如果程序执行多遍，文本会越来越大，内容不断重复追加。

思考：
例子2中，第一个输出过程用>操作符，第二个输出用>> 操作符，重复执行程序时，会出现什么效果？
由于第一个输出过程用的是>，所以每次执行程序就会覆盖掉之前的内容，由于第二个输出过程用的是>>，所以会把内容追加到文本。输出的文件结果为：
1 2 3 4 5 6 7 8 9 10
one
two
three
shift
pop
unshift
push
（哪怕程序执行多遍，依然是这个结果）