Guest User

Untitled

a guest
Jun 19th, 2018
100
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.87 KB | None | 0 0
  1. # enqueue job:
  2. use Qudo;
  3. my $qudo = Qudo->new(
  4. databases => [+{
  5. dsn => 'dbi:SQLite:/tmp/qudo.db',
  6. username => '',
  7. password => '',
  8. }],
  9. manager_abilities => [
  10. 'Worker::Test',
  11. {
  12. module => 'Worker::Test2',
  13. hooks => [qw/Qudo::Hook::Serialize::JSON/],
  14. },
  15. ],
  16. );
  17. $qudo->enqueue("Worker::Test", { arg => 'arg', uniqkey => 'uniqkey'});
  18. $qudo->enqueue("Worker::Test2", { arg => {foo => 'bar'}, uniqkey => 'uniqkey'});
  19.  
  20. # do work:
  21. use Qudo;
  22. my $qudo2 = Qudo->new(
  23. databases => [+{
  24. dsn => 'dbi:SQLite:/tmp/qudo.db',
  25. username => '',
  26. password => '',
  27. }],
  28. manager_abilities => [
  29. 'Worker::Test',
  30. {
  31. module => 'Worker::Test2',
  32. hooks => [qw/Worker::Hook::Sample/],
  33. },
  34. ],
  35. );
  36. $qudo2->work(); # boot manager
  37. # work work work!
Add Comment
Please, Sign In to add comment