4 use HTTP::Request::Common;
7 package MyApp::Controller::Root;
8 $INC{'MyApp/Controller/Root.pm'} = __FILE__;
11 use MooseX::MethodAttributes;
13 extends 'Catalyst::Controller';
16 pop->res->from_psgi_response([200, ['Content-Type'=>'text/plain'],['check']]);
19 MyApp::Controller::Root->config(namespace=>'');
27 use Catalyst::Test 'MyApp';
30 my $res = request '/check';
31 is $res->code, 200, 'OK';
32 is $res->content, 'check', 'correct body';
33 is $res->content_length, 5, 'correct length';