Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #!/usr/bin/perl
- use strict;
- use warnings;
- use Qudo;
- my $qudo = Qudo->new(
- driver_class => 'Skinny',
- databases => [+{
- dsn => 'dbi:mysql:qudo',
- username => 'root',
- password => '',
- }],
- manager_abilities => [qw/ MyApp::Worker::Santa /],
- );
- $qudo->manager->register_plugins(qw/MyApp::Worker::Plugin::PreMessage/);
- $qudo->manager->global_register_hooks(qw/Qudo::Hook::Serialize::JSON/);
- $qudo->work;
Add Comment
Please, Sign In to add comment