IO::Iron::IronMQ::Client - IronMQ (Message Queue) Client.
version 0.07_03
require IO::Iron::IronMQ::Client; my $iron_mq_client = IO::Iron::IronMQ::Client->new( {} ); my $iron_mq_queue = $iron_mq_client->create_queue('My_Message_Queue'); # Or get an existing queue. my $iron_mq_queue = $iron_mq_client->get_queue('My_Message_Queue'); my $queue_info = $iron_mq_client->get_info_about_queue('My_Message_Queue'); my $iron_mq_msg_send = IO::Iron::IronMQ::Message->new( { 'body' => "My message", } ); my $msg_send_id = $iron_mq_queue->push($iron_mq_msg_send); my $iron_mq_msg_peek = $iron_mq_queue->peek(); my @iron_mq_msgs_pull = $iron_mq_queue->pull( { n => 1 } ); my $pulled_msg_body = $iron_mq_msgs_pull[0]->body(); my $delete_ret = $iron_mq_queue->delete( $iron_mq_msgs_pull[0]->id() ); my $cleared = $iron_mq_queue->clear; my $queue_deleted = $iron_mq_client->delete_queue('My_Message_Queue');
Requires the following packages:
Requires IronMQ account. Three configuration items must be set (others available) before using the functions: 'project_id', 'token' and 'host'. These can be set in a json file, as environmental variables or as parameters when creating the object.
IO::Iron::IronMQ is a client for the IronMQ message queue at http://www.iron.io/. IronMQ is a cloud based message queue with a REST API. IO::Iron::IronMQ creates a Perl object for interacting with IronMQ. All IronMQ functions are available. (Push queue functions are not yet implemented.)
The class IO::Iron::IronMQ::Client instantiates the 'project', IronMQ access configuration.
http://www.iron.io/
IronMQ is a message queue as a service available to Internet connecting applications via its REST interface. Built with distributed cloud applications in mind, it provides on-demand message queuing with HTTPS transport, one-time FIFO delivery, message persistence, and cloud-optimized performance. [see http://www.iron.io/]
IO::Iron::IronMQ::Client is a normal Perl package meant to be used as an object.
require IO::Iron::IronMQ::Client; my $iron_mq_client = IO::Iron::IronMQ::Client->new( { } );
The following parameters can be given to new() as items in the first parameter which is a hash.
You can also give the parameters in the config file '.iron.json' (in home dir) or 'iron.json' (in current dir) or as environmental variables. Please read http://dev.iron.io/mq/reference/configuration/ for further details.
After creating the client, the client can create a new message queue, get, modify or delete an old one or get all the existing message queues within the same project.
The client has all the methods which interact with queues; the queue (object of IO::Iron::IronMQ::Queue) has methods which involve messages.
If failed, the methods cause exception. After successfull REST API call, the HTTP return code can be retrieved from variable $client->{'last_http_status_code'}.
# Create a new queue. (Parameter queue name; # return an IO::Iron::IronMQ::Queue object) my $iron_mq_queue = $iron_mq_client->create_queue('My_Message_Queue'); # Get an existing queue. (Parameter queue name; # return an IO::Iron::IronMQ::Queue object) my $iron_mq_queue = $iron_mq_client->get_queue('My_Message_Queue'); # Delete an existing queue. (Parameter queue name; # return 1) my $success = $iron_mq_client->delete_queue('My_Message_Queue'); # Get all the queues. # Return a list of IO::Iron::IronMQ::Queue objects. my @iron_mq_queues = $iron_mq_client->get_queues(); # Update a queue. Return a IO::Iron::IronMQ::Queue object. # Queue properties: set queue type (pull, multicast, unicast), set subscribers. # Push queue feature; not yet implemented. my $iron_mq_queue = $iron_mq_client->update_queue('My_Message_Queue', {} ); # Not yet implemented. # Get info about the queue # (Return a hash containing items name, id, size, project, etc.). my $queue_info = $iron_mq_client->get_info_about_queue('My_Message_Queue');
A IO::Iron::IronMQ::Queue object gives access to a single message queue. With it you can do all the normal things one would with a message queue.
Messages are objects of the class IO::Iron::IronMQ::Message. It contains the following attributes:
my $iron_mq_msg_send_01 = IO::Iron::IronMQ::Message->new( { 'body' => "My message", } ); # Or use YAML::Tiny; %msg_body_hash_02 = (msg_body_text => 'My message 2', msg_body_item => {sub_item => 'Sub text'}); my $yaml = YAML::Tiny->new(); $yaml->[0] = \%msg_body_hash_02; my $msg_body = $yaml->write_string(); my $iron_mq_msg_send_02 = IO::Iron::IronMQ::Message->new( { 'body' => $msg_body, 'timeout' => $msg_timeout, # When reading from queue, after timeout (in seconds), item will be placed back onto queue. 'delay' => $msg_delay, # The item will not be available on the queue until this many seconds have passed. 'expires_in' => $msg_expires_in, # How long in seconds to keep the item on the queue before it is deleted. } ); # Return YAML serialized structure: my $yaml_de = YAML::Tiny->new(); $yaml_de = $yaml_de->read_string($iron_mq_msg_send_02->body());
IO::Iron::IronMQ::Queue objects are created by the client IO::Iron::IronMQ::Client. With an IO::Iron::IronMQ::Queue object you can push messages to the queue, or pull messages from it. The names push and pull are used because the queue is likened to a pipe. The queue is like a FIFO pipe (first in, first out).
Get queue id.
my $queue_id = $iron_mq_queue->id();
Get queue name.
my $queue_name = $iron_mq_queue->name();
Add one or more messages to the queue. Returns the ids of the messages sent or the number of sent messages.
my $msg_send_id = $iron_mq_queue->push($iron_mq_msg_send_01); my @msg_send_ids = $iron_mq_queue->push($iron_mq_msg_send_01, $iron_mq_msg_send_02, [...]); my $number_of_msgs_sent = $iron_mq_queue->push($iron_mq_msg_send_01, $iron_mq_msg_send_02, [...]);
Read one or more messages from the queue and reserve them so another process cannot access them. Parameters: n (number of messages you want, default 1, maximum 100; if there is less, all available messages will be returned), if no messages, an empty list will be returned, timeout (After timeout (in seconds), item will be placed back onto queue, default is 60 seconds, minimum is 30 seconds, and maximum is 86,400 seconds (24 hours)).
my @iron_mq_msg_pulls = $iron_mq_queue->pull( { n => 10, timeout => 120 } );
Read one or more messages from the queue but don't reserve them. Parameters: n (number of messages you want, default 1, maximum 100; if there is less, all available messages will be returned), if no messages, an empty list will be returned.
my @iron_mq_msg_peeks = $iron_mq_queue->peek( { n => 10 } );
Delete one or more messages from the queue. Call this when you have processed the messages. Returns the ids of the messages deleted or the number of deleted messages.
my $deleted_msg_id = $iron_mq_queue->delete($msg_id_01); my @deleted_msg_ids = $iron_mq_queue->delete($msg_id_01, $msg_id_02, [...]); my $number_of_msgs_deleted = $iron_mq_queue->delete($msg_id_01, $msg_id_02, [...]);
Release one or more messages back to the queue. Releasing a reserved message unreserves the message and puts it back on the queue as if the message had timed out. Delay: The item will not be available on the queue until this many seconds have passed. Default is 0 seconds. Maximum is 604,800 seconds (7 days).
Returns 1.
my $released_msg = $iron_mq_queue->release($msg_id_01, $delay);
Touch one or more messages in the queue. Touching a reserved message extends its timeout to the duration specified when the message was created. Default is 60 seconds. Returns 1.
my $touched_msg = $iron_mq_queue->touch($msg_id_01);
Clear all messages from the queue: delete all messages, whether they are reserved or not.
my $cleared = $iron_mq_queue->clear;
Get queue size.
my $size = $iron_mq_queue->size;
Get push status for a message. Push queue feature; not yet implemented.
Add Subscribers to a Queue. Push queue feature; not yet implemented.
Remove Subscribers from a Queue Push queue feature; not yet implemented.
A REST call to IronMQ server may fail for several reason. All failures generate an exception using the Exception::Class package. Class IronHTTPCallException contains the field status_code, response_message and error. Error is formatted as such: IronHTTPCallException: status_code=<HTTP status code> response_message=<response_message>.
use Try::Tiny; use Scalar::Util qw{blessed}; try { my $queried_iron_mq_queue_01 = $iron_mq_client->get_queue($unique_queue_name_01); } catch { die $_ unless blessed $_ && $_->can('rethrow'); if ( $_->isa('IronHTTPCallException') ) { if ($_->status_code == 404) { print "Bad things! Can not just find the catch in this!\n"; } } else { $_->rethrow; # Push the error upwards. } };
Creator function.
Return a IO::Iron::IronMQ::Queue object representing a particular message queue.
Delete an IronMQ queue.
Return a IO::Iron::IronMQ::Queue objects representing message queues.
Update an IronMQ queue represented by IO::Iron::IronMQ::Queue object.
Mikko Koivunalho, <mikko.koivunalho at iki.fi>
<mikko.koivunalho at iki.fi>
Please report any bugs or feature requests to bug-io-iron at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=IO-Iron. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
bug-io-iron at rt.cpan.org
You can find documentation for this module with the perldoc command.
perldoc IO::Iron::IronMQ::Client
You can also look for information at:
RT: CPAN's request tracker (report bugs here)
http://rt.cpan.org/NoAuth/Bugs.html?Dist=IO-Iron
AnnoCPAN: Annotated CPAN documentation
http://annocpan.org/dist/IO-Iron
CPAN Ratings
http://cpanratings.perl.org/d/IO-Iron
Search CPAN
http://search.cpan.org/dist/IO-Iron/
Cool idea, "message queue in the cloud": http://www.iron.io/.
Some get_*s (e.g. get messages) commands not yet implemented.
The IronMQ client needs to control the queues, perhaps using semafores.
A buffer mechanism to keep the messages while the IronMQ REST service is unavailable. IO::Iron::IronMQ::ASyncPush?
Push queues.
Mock IronMQ for testing.
Rethink the using of REST:Client. Since message queues often involve a lot of traffic but always to the same address, REST:Client might not be the best solution.
Handle message size issues: max 64KB; Includes the entire request (delay, timeout, expiration).
Handle message delay, timeout and expiration min-max values.
Message Var Default Maximum Notes Message Size -- 64KB Includes the entire request (delay, timeout, expiration). Delay 0sec 604,800sec Message is made available on queue after the delay expires. Timeout 60sec 86,400sec Message goes back on queue after timeout unless deleted. Expiration 604,800sec 2,592,000sec Equates to 7 days and 30 days, respectively. Messages per Get 1 100 One or more messages can be handled at a time.
Better logging, consistent log and error messages.
Option to delete queue when IO::Iron::IronMQ::Queue object goes to garbage collection.
Verify the client is connected when created by calling queues!
Copyright 2013 Mikko Koivunalho.
This program is free software; you can redistribute it and/or modify it under the terms of the the Artistic License (2.0). You may obtain a copy of the full license at:
http://www.perlfoundation.org/artistic_license_2_0
Any use, modification, and distribution of the Standard or Modified Versions is governed by this Artistic License. By using, modifying or distributing the Package, you accept this license. Do not use, modify, or distribute the Package, if you do not accept this license.
If your Modified Version has been derived from a Modified Version made by someone other than you, you are nevertheless required to ensure that your Modified Version complies with the requirements of this license.
This license does not grant you the right to use any trademark, service mark, tradename, or logo of the Copyright Holder.
This license includes the non-exclusive, worldwide, free-of-charge patent license to make, have made, use, offer to sell, sell, import and otherwise transfer the Package with respect to any patent claims licensable by the Copyright Holder that are necessarily infringed by the Package. If you institute patent litigation (including a cross-claim or counterclaim) against any party alleging that the Package constitutes direct or contributory patent infringement, then this Artistic License to you shall terminate on the date that such litigation is filed.
Disclaimer of Warranty: THE PACKAGE IS PROVIDED BY THE COPYRIGHT HOLDER AND CONTRIBUTORS "AS IS' AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES. THE IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT ARE DISCLAIMED TO THE EXTENT PERMITTED BY YOUR LOCAL LAW. UNLESS REQUIRED BY LAW, NO COPYRIGHT HOLDER OR CONTRIBUTOR WILL BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, OR CONSEQUENTIAL DAMAGES ARISING IN ANY WAY OUT OF THE USE OF THE PACKAGE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
To install IO::Iron, copy and paste the appropriate command in to your terminal.
cpanm
cpanm IO::Iron
CPAN shell
perl -MCPAN -e shell install IO::Iron
For more information on module installation, please visit the detailed CPAN module installation guide.