Qudo::Parallel::Manager - auto control forking manager process.
use Qudo::Parallel::Manager; my $manager = Qudo::Parallel::Manager->new( databases => [+{ dsn => 'dbi:SQLite:/tmp/qudo.db', username => '', password => '', }], work_delay => 3, max_workers => 5, min_spare_workers => 1, max_spare_workers => 5, max_request_par_chiled => 30, auto_load_worker => 1, admin => 1, debug => 1, ); $manager->run; # start fork and work. # other process. get worker scoreborad. use IO::Socket::INET; my $sock = IO::Socket::INET->new( PeerHost => '127.0.0.1', PeerPort => 90000, Proto => 'tcp', ) or die 'can not connect admin port.'; # get scoreborad # ex) _ . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . my $status = $sock->getline; $sock->close;
Qudo::Parallel::Manager is auto control forking manager process. and get worker scoreborad.
Atsushi Kobayashi <nekokak _at_ gmail _dot_ com>
Qudo
Parallel::Prefork::SpareWorkers
IO::Socket::INET
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
To install Qudo::Parallel::Manager, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Qudo::Parallel::Manager
CPAN shell
perl -MCPAN -e shell install Qudo::Parallel::Manager
For more information on module installation, please visit the detailed CPAN module installation guide.