Commit | Line | Data |
---|---|---|
e2aa4a21 | 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 | ||
3eba0dd5 | 10 | sub test_nested_for :Local { |
11 | my ($self, $c) = @_; | |
12 | $c->res->body($c->req->body_data->{nested}->{value}); | |
13 | } | |
14 | ||
e2aa4a21 | 15 | 1; |