windows - Perl Windows - ファイルを見て最後の行を読む

Question

Windows Perl でファイルを監視しようとしています。Win32::ChangeNotify を使用しています

これが私のコードです：

use strict;
use warnings;


require Win32::ChangeNotify;
use Data::Dumper;

my $Path="C:\\Eamorr\\";
my $WatchSubTree=0;
my $Events="FILE_NAME";

my $notify=Win32::ChangeNotify->new($Path,$WatchSubTree,$Events);
while(1){
    $notify->reset;
    $notify->wait;
    print "File changed\n";
}

しかし、「変更されたファイル」は印刷されません。これは非常に基本的なことだと思いますが、この Windows プラットフォームで本当に苦労しています。

「C:\Eamorr\Eamorr.out」に変更を監視したいファイルがあります (別のプログラムによって 10 分ごとに新しいデータ行がこのファイルに追加されます)。

Eamorr.out が更新されたら、Perl を実行して MySQL テーブルに入力できるようにしたいと考えています。

ファイル Eamorr.out を見て、最後の行をコンソールに出力するのを手伝ってください。

ps私はWindows Server 2003を使用しています

よろしくお願いします。