GSP
Quick Navigator

Search Site

Unix VPS
A - Starter
B - Basic
C - Preferred
D - Commercial
MPS - Dedicated
Previous VPSs
* Sign Up! *

Support
Contact Us
Online Help
Handbooks
Domain Status
Man Pages

FAQ
Virtual Servers
Pricing
Billing
Technical

Network
Facilities
Connectivity
Topology Map

Miscellaneous
Server Agreement
Year 2038
Credits
 

USA Flag

 

 

Man Pages
Test::Net::RabbitMQ(3) User Contributed Perl Documentation Test::Net::RabbitMQ(3)

Test::Net::RabbitMQ - A mock RabbitMQ implementation for use when testing.

version 0.13

    use Test::Net::RabbitMQ;

    my $mq = Test::Net::RabbitMQ->new;

    $mq->connect;

    $mq->channel_open(1);

    $mq->exchange_declare(1, 'order');
    $mq->queue_declare(1, 'new-orders');

    $mq->queue_bind(1, 'new-orders', 'order', 'order.new');

    $mq->publish(1, 'order.new', 'hello!', { exchange => 'order' });

    $mq->consume(1, 'new-orders');

    my $msg = $mq->recv;

    # Or

    my $msg = $mq->get(1, 'order.new', {});

Test::Net::RabbitMQ is a terrible approximation of using the real thing, but hopefully will allow you to test systems that use Net::AMQP::RabbitMQ or Net::RabbitMQ without having to use an actual RabbitMQ instance.

The general overview is that calls to "publish" pushes a message into one or more queues (or none if there are no bindings) and calls to "recv" pop them.

This module has all the features I've needed to successfully test our RabbitMQ-using application. Patches are welcome if I'm missing something you need! At the moment there are a number of shortcomings:
"recv" doesn't block
exchanges are all topic
lots of other stuff!

If false then any calls to connect will die to emulate a failed connection.

If set to true (which you can do at any time) then a message will be emitted to STDERR any time a message is added to a queue.

Closes the specific channel.

Opens a channel with the specific number.

Connects this instance. Does nothing except set "connected" to true. Will throw an exception if you've set "connectable" to false.

Sets the queue that will be popped when "recv" is called.

Cancels the subscription for the given consumer tag. Calls to "recv" after this will throw an error unless you call "consume" again. This method always returns true if there is a subscription to cancel, false otherwise.

Disconnects this instance by setting "connected" to false.

Creates an exchange of the specified name.

Deletes an exchange of the specified name.

Begins a transaction on the specified channel. From this point forward all publish() calls on the channel will be buffered until a call to "tx_commit" or "tx_rollback" is made.

Commits a transaction on the specified channel, causing all buffered publish() calls to this point to be published.

Rolls the transaction back, causing all buffered publish() calls to be wiped.

Get a message from the queue, if there is one.

Like "Net::RabbitMQ", this will return a hash containing the following information:

     {
       body => 'Magic Transient Payload', # the reconstructed body
       routing_key => 'nr_test_q',        # route the message took
       exchange => 'nr_test_x',           # exchange used
       delivery_tag => uint64(1),         # (inc'd every recv or get)
       redelivered => 0,                  # always 0
       message_count => 0,                # always 0
     }

Binds the specified queue to the specified exchange using the provided routing key. Note that, at the moment, this doesn't work with AMQP wildcards. Only with exact matches of the routing key.

Creates a queue of the specified name.

Deletes a queue of the specified name.

Unbinds the specified routing key from the provided queue and exchange.

Publishes the specified body with the supplied routing key. If there is a binding that matches then the message will be added to the appropriate queue(s).

Provided you've called "consume" then calls to recv will "pop" the next message of the queue. Note that this method does not block.

Like "Net::RabbitMQ", this will return a hash containing the following information:

     {
       body => 'Magic Transient Payload', # the reconstructed body
       routing_key => 'nr_test_q',        # route the message took
       exchange => 'nr_test_x',           # exchange used
       delivery_tag => uint64(1),         # (inc'd every recv or get)
       redelivered => $boolean            # if message is redelivered
       consumer_tag => '',                # Always blank currently
       props => $props,                   # hashref sent in
     }

Cory G Watson <gphat@cpan.org>

This software is copyright (c) 2015 by Cory G Watson.

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

2015-04-22 perl v5.32.1

Search for    or go to Top of page |  Section 3 |  Main Index

Powered by GSP Visit the GSP FreeBSD Man Page Interface.
Output converted with ManDoc.