basic worker using presque::worker

1 files changed, 20 insertions, 0 deletions

diff --git a/eg/worker.pl b/eg/worker.pl
new file mode 100644
index 0000000..fc7526c
--- /dev/null
+++ b/eg/worker.pl
@@ -0,0 +1,20 @@
+use strict;
+use warnings;
+use 5.012;
+
+package simple::worker;
+use Moose;
+extends 'presque::worker';
+
+sub work {
+    my ($self, $job) = @_;
+    say "job's done";
+    return;
+}
+
+package main;
+use AnyEvent;
+
+my $worker = simple::worker->new(base_uri => 'http://localhost:5002', queue => 'baz2');
+
+AnyEvent->condvar->recv;