The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Plack::App::ServiceStatus::NetStomp - Check Net::Stomp connection

VERSION

version 0.903

SYNOPSIS

  my $stomp = Net::Stomp->new(
      { hostname => 'localhost', port => '61613' }
  );
  $stomp->connect( { login => 'hello', passcode => 'there' } );
  my $status_app = Plack::App::ServiceStatus->new(
      app      => 'your app',
      NetStomp => $stomp,
  );

CHECK

Temporarily reduces the reconnect_attempts to 1, and then starts a new STOMP transaction which is immediately aborted again. If this is successful, the check returns ok, otherwise nok and the exception.

PARAMETERS

Takes either a Net::Stomp instance (where connect() was already called on) or a code reference which returns such a Net::Stomp instance when called.

AUTHOR

Thomas Klausner <domm@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2016 by Thomas Klausner.

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