Net::Stomp::Receipt - An extension to Net::Stomp (STOMP client) to allow transactional sends.

  use Net::Stomp::Receipt;

  my $stomp = Net::Stomp::Receipt->new({
    hostname   => 'localhost',
    port       => '61613',
    PERSISTENT => 1,
  });

  $stomp->connect({
    login    => 'hello',
    passcode => 'there'
  });

  $stomp->send_safe({
    destination => '/queue/foo',
    body => 'test message'
  }) or die "Couldn't send the message!";

This module is an extension to Net::Stomp module, an Streaming Text Orientated Messaging Protocol client, that adds a new method send_safe which uses "transactional sends".

By this way, any message sent to the stomp server is identified with a transaction id, that must be acked by a server receipt. In case of failure, the send is aborted.

Net::Stomp module

The protocol spec: http://stomp.codehaus.org/Protocol

Hugo Salgado, <huguei@cpan.org<gt>

This module was built for NIC Chile (http://www.nic.cl), who granted its liberation as free software.

Copyright (C) 2008 by Hugo Salgado

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.10.0 or, at your option, any later version of Perl 5 you may have available.