unter windows funzt dein script kein stück.
es word nichtmal die datei ausgegeben.
ansonsten könnte man die windows api anprogrammieren und die Function FindFirstChangeNotification anprogrammieren ( gibts vielleicht auch schon auf cpan, hab es nur nicht gefunden ).

für linux hab ich noch Linux::Inotify2 gefunden.