
Jonk - simple job tank manager.

use DBI;
my $dbh = DBI->connect(...);
# enqueue job
{
use Jonk::Client;
my $jonk = Jonk::Client->new($dbh);
$jonk->enqueue('MyWorker', 'arg');
}
# dequeue job
{
use Jonk::Worker;
my $jonk = Jonk::Worker->new($dbh, {functions => ['MyWorker']});
my $job = $jonk->dequeue;
print $job->{func}; # MyWorker
print $job->{arg}; # arg
}

Jonk is simple job tanking system.
Job is saved and taken out. Besides, nothing is done.
You may use Jonk to make original Job Queuing System.

enqueue client class.

dequeue client class.

CREATE TABLE job (
id int(10) unsigned NOT NULL auto_increment,
func varchar(255) NOT NULL,
arg MEDIUMBLOB,
enqueue_time DATETIME NOT NULL,
primary key ( id )
) ENGINE=InnoDB
CREATE TABLE job (
id INTEGER PRIMARY KEY ,
func text,
arg text,
enqueue_time text
)
CREATE TABLE job (
id SERIAL PRIMARY KEY,
func TEXT NOT NULL,
arg BYTEA,
enqueue_time TIMESTAMP NOT NULL
)

irc: #jonk@irc.perl.org

git clone git://github.com/nekokak/p5-Jonk.git

tokuhirom
kan_fushihara
fujiwara

Atsushi Kobayashi <nekokak _at_ gmail _dot_ com>

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.