MyCPAN::Indexer::Dispatcher::Parallel - Pass out work to sub-processes
Use this in backpan_indexer.pl by specifying it as the queue class:
# in backpan_indexer.config
dispatch_class MyCPAN::Indexer::Dispatcher::Parallel
This class takes the list of distributions to process and passes them out to the code that will do the work.
Takes the $Notes hash and adds the dispatcher key with a code reference. This module uses Parallel::ForkManager to run jobs in parallel, and looks at the
It also sets up keys for PID, whose value is an anonymous array of process IDs. That array matches up with the one in the key recent which keeps track of the distributions it's processing. It adds:
dispatcher => sub { ... },
PID => [],
recent => [],
MyCPAN::Indexer, MyCPAN::Indexer::Tutorial
This code is in Github:
git://github.com/briandfoy/mycpan-indexer.git
brian d foy, <bdfoy@cpan.org>
Copyright (c) 2008-2009, brian d foy, All Rights Reserved.
You may redistribute this under the same terms as Perl itself.
