NAME
Catalyst::Controller::MessageDriven
SYNOPSIS
package MyApp::Controller::Queue;
use Moose;
BEGIN { extends 'Catalyst::Controller::MessageDriven' }
sub some_action : Local {
my ($self, $c, $message) = @_;
# Handle message
# Reply with a minimal response message
my $response = { type => 'testaction_response' };
$c->stash->{response} = $response;
}
DESCRIPTION
A Catalyst controller base class for use with Catalyst::Engine::Stomp, which handles YAML-serialized messages. A top-level "type" key in the YAML determines the action dispatched to.
METHODS
begin
Deserializes the request into $c->stash->{request}
default
Dispatches to method named by the key $c->stash->{request}->{type}
end
Serializes the response from $c->stash->{response}
CONFIGURATION
In the configuration file add the following to set the value for a parameter
<MessageDriven>
type_key foo
</MessageDriven>
type_key
The hash key the module will try to pull out the received message to call within the controller. This defaults to 'type'.
serializer
The serializer used to serialiser/deserialise. See Data::Serializer to see what is available. Defaults to YAML. JSON is anotther that is available.
AUTHOR AND CONTRIBUTORS
See information in Catalyst::Engine::Stomp
LICENCE AND COPYRIGHT
Copyright (C) 2009 Venda Ltd
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.