POE::Component::DirWatch::Object::NewFile
use POE::Component::DirWatch::Object::NewFile;
#$watcher is a PoCo::DW:Object::NewFile
my $watcher = POE::Component::DirWatch::Object::NewFile->new
(
alias => 'dirwatch',
directory => '/some_dir',
filter => sub { $_[0] =~ /\.gz$/ && -f $_[1] },
callback => \&some_sub,
interval => 1,
);
$poe_kernel->run;
POE::Component::DirWatch::Object::NewFile extends DirWatch::Object in order to exclude files that have already been processed
Read-write. Will return a hash ref in with keys will be the full path of all previously processed documents.
override 'dispatch' Don't dispatch if file has been seen.
before 'poll' the list of known files is checked and if any of the files no longer exist they are removed from the list of known files to avoid the list growing out of control.
Keeping tests happy.
POE::Component::DirWatch::Object, Moose
Guillermo Roditi, <groditi@cpan.org>
Please report any bugs or feature requests to bug-poe-component-dirwatch-object at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=POE-Component-DirWatch-Object. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
You can find documentation for this module with the perldoc command.
perldoc POE::Component::DirWatch::Object::NewFile
You can also look for information at:
http://rt.cpan.org/NoAuth/Bugs.html?Dist=POE-Component-DirWatch-Object
People who answered way too many questions from an inquisitive idiot:
Copyright 2006 Guillermo Roditi. All Rights Reserved. This is free software; you may redistribute it and/or modify it under the same terms as Perl itself.
