Robert Rothenberg
and 1 contributors

NAME

POE::Component::DirWatch::Object::Untouched

SYNOPSIS

  use POE::Component::DirWatch::Object::Untouched;

  #$watcher is a PoCo::DW:Object::Untouched
  my $watcher = POE::Component::DirWatch::Object::Untouched->new
    (
     alias         => 'dirwatch',
     directory     => '/some_dir',
     filter        => sub { $_[0] =~ /\.gz$/ && -f $_[1] },
     callback      => \&some_sub,
     interval      => 5,
     stat_interval => 2, #pick up files if they are untouched after 2 seconds
    );

  $poe_kernel->run;

DESCRIPTION

POE::Component::DirWatch::Object::Untouched extends DirWatch::Object in order to exclude files that appear to be in use or are actively being changed.

Accessors

stat_interval

Read-Write. An integer value that specifies how many seconds to wait in between the call to dispatch and the actual dispatch. The interval here serves as a dead period in between when the initial stat readings are made and the second reading is made (the one that determines whether there was any change or not). Note that the interval in POE::Component::DirWatch::Object will be delayed by this length. See _stat_check for details.

cmp

An Array::Compare object

Extended methods

_start

after '_start' the kernel is called and a new 'stat_check' event is added.

_dispatch

override '_dispatch' to delay and delegate the dispatching to _stat_check. Filtering still happens at this stage.

New Methods

_stat_check

Schedule a callback event for every file whose contents have not changed since the poll event. After all callbacks are scheduled, set an alarm for the next poll.

ARG0 should be the proper params for callback and ARG1 the original stat() reading we are comparing against.

meta

Keeping tests happy.

SEE ALSO

POE::Component::DirWatch::Object, Moose

AUTHOR

Guillermo Roditi, <groditi@cpan.org>

BUGS

If a file is created and deleted between polls it will never be seen. Also if a file is edited more than once in between polls it will never be picked up.

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.

SUPPORT

You can find documentation for this module with the perldoc command.

    perldoc POE::Component::DirWatch::Object::Untouched

You can also look for information at:

ACKNOWLEDGEMENTS

People who answered way too many questions from an inquisitive idiot:

#PoE & #Moose
Matt S Trout <mst@shadowcatsystems.co.uk>
Rocco Caputo

COPYRIGHT

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.