5 # Test case for reported issue when an action consumes JSON but a
6 # POST sends nothing we get a hard error
9 package MyApp::Controller::Root;
10 $INC{'MyApp/Controller/Root.pm'} = __FILE__;
12 use base 'Catalyst::Controller';
14 sub root :Chained(/) CaptureArgs(0) { }
16 sub get :GET Chained(root) PathPart('') Args(0) { }
17 sub post :POST Chained(root) PathPart('') Args(0) { }
18 sub put :PUT Chained(root) PathPart('') Args(0) { }
25 use HTTP::Request::Common;
26 use Catalyst::Test 'MyApp';
29 ok my $res = request POST 'root/';