Search on CPAN, there might already be a solution. A quick search for file monitor showed up File::Monitor::Object, which might do what you want.

Also File::ChangeNotify looks rather promising.