view release on metacpan or  search on metacpan

lib/Log/Saftpresse/Slurp.pm  view on Meta::CPAN

use IO::Select;
use Time::HiRes qw( sleep gettimeofday tv_interval );

has 'plugin_prefix' => ( is => 'ro', isa => 'Str',
	default => 'Log::Saftpresse::Input::',
);

has 'io_select' => ( is => 'rw', isa => 'Maybe[IO::Select]' );

sub update_io_select {
	my $self = shift;
	my $s = IO::Select->new;
	foreach my $plugin ( @{$self->plugins} ) {
		$s->add( $plugin->io_handles );
	}
	$self->io_select( $s );
	return;
};

has '_last_run' => ( is => 'rw', isa => 'Maybe[ArrayRef]' );