--- /dev/null
+package StompTestApp::Controller::TestController;
+use Moose;
+
+BEGIN { extends 'Catalyst::Controller::MessageDriven' };
+
+sub testaction : Local {
+ my ($self, $c) = @_;
+
+ # Reply with a minimal response message
+ my $response = { type => 'testaction_response' };
+ $c->stash->{response} = $response;
+}
+
+1;