Efficient multiplatform directory polling

rastoboy has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Efficient multiplatform directory polling by moritz (Cardinal) on Jun 14, 2009 at 10:51 UTC
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.	[reply]
Re: Efficient multiplatform directory polling by sflitman (Hermit) on Jun 14, 2009 at 11:14 UTC
I think the most cross-platform portable way to do this is polling, but glob and stat are actually pretty quick: `sub getNewestFile { my $dir=shift; my @files=glob "$dir/*"; my %mtimes; map { $mtimes{$_}=(stat $_)[9] } @files; @files=sort { $mtimes{$b}<=>$mtimes{$a} } keys %mtimes; $files[0]; }` [download] See what you think, burden on your system should be minimal if you do it less than once every second. HTH, SSF	[reply] [d/l]