使用Perl简单地监视文件追加变化

虽然perl有tail模块，但是这种方法可以实现简单的日志监视功能，不依赖于特定的Perl模块。
例子如下所示：

#!/usr/bin/perl

use strict;
use warnings;
open MYFD, "tail -f /var/log/messages |";
while(<MYFD>)
{
        print $_;
}
close(MYFD);