t/lib/TestDataHandlers/Controller/Root.pm

   1 package TestDataHandlers::Controller::Root;
   2
   3 use base 'Catalyst::Controller';
   4
   5 sub test_json :Local {
   6     my ($self, $c) = @_;
   7     $c->res->body($c->req->body_data->{message});
   8 }
   9
  10 1;