|
NAMEJonk - simple job tank manager.SYNOPSISuse 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 } DESCRIPTIONJonk 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. Jonk::Clientenqueue client class.Jonk::Workerdequeue client class.SCHEMAMySQLCREATE 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 SQLiteCREATE TABLE job ( id INTEGER PRIMARY KEY , func text, arg text, enqueue_time text ) PostgreSQLCREATE TABLE job ( id SERIAL PRIMARY KEY, func TEXT NOT NULL, arg BYTEA, enqueue_time TIMESTAMP NOT NULL ) SUPPORTirc: #jonk@irc.perl.org REPOSITORYgit clone git://github.com/nekokak/p5-Jonk.git CONTRIBUTORStokuhiromkan_fushihara fujiwara AUTHORAtsushi Kobayashi <nekokak _at_ gmail _dot_ com>LICENSEThis library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Visit the GSP FreeBSD Man Page Interface. |