Commit | Line | Data |
---|---|---|
e2aa4a21 | 1 | package TestDataHandlers::Controller::Root; |
2 | ||
3 | use base 'Catalyst::Controller'; | |
4 | ||
53c7cc10 | 5 | sub root :Path('/') {} |
6 | ||
e2aa4a21 | 7 | sub test_json :Local { |
8 | my ($self, $c) = @_; | |
9 | $c->res->body($c->req->body_data->{message}); | |
10 | } | |
11 | ||
3eba0dd5 | 12 | sub test_nested_for :Local { |
13 | my ($self, $c) = @_; | |
14 | $c->res->body($c->req->body_data->{nested}->{value}); | |
15 | } | |
16 | ||
e2aa4a21 | 17 | 1; |