Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #!/usr/bin/env perl
- use strict;
- use warnings;
- use Qudo::Parallel::Manager;
- my $manager = Qudo::Parallel::Manager->new(
- databases => [+{
- dsn => 'dbi:mysql:qudo',
- username => 'root',
- password => '',
- }],
- manager_abilities => [qw/RetrieveAccessLog RetrieveActionLog/],
- work_delay => 5,
- max_workers => 5,
- min_spare_workers => 3,
- max_spare_workers => 5,
- max_request_par_child => 30,
- auto_load_worker => 1,
- admin => 1,
- debug => 1,
- );
- $manager->{qudo}->manager->register_hooks(qw/Qudo::Hook::Serialize::JSON/);
- $manager->run;
Add Comment
Please, Sign In to add comment