Perl模块之Tie::File

原文：http://hi.baidu.com/mylongwalk/blog/item/004df0220cc2cc4dad34dea0.html

perl的Tie::File模块真是与乎寻常的强大

Tie::File:  
             Tie::File - Access the lines of a disk file via a Perl array: 将一个file和array tie起来，对array所做的任何操作都会同步反映到file上，等同于对文件进行了操作。

注意：Tie::File模块不适用于处理存放大量短小记录的文件！！

    这里所说的记录型文件，是指文件读写时的最小单位是记录而不是通常的字节。数据记录之间以记录分隔符隔开，故要求文件有效数据的内容不会与记录分隔符相混淆。通常我们使用的文本文件就属于记录型文件，它的记录分隔符在win32下是\r\n序列，在unix下则是\n。对于记录型文件，Perl提供了一个模块Tie::File将文件同一个数组关联起来，对数组进行操作就等价于对文件本身进行操作，数组内容所有的改变都会立即反映在文件中。更令人兴奋的是同文件相关的这个数组是一个“虚拟”数组，本身并不会占用多少空间，因此即使操作数以GB计的文件也十分轻松。其用法如下：

use strict;