t/lib/TestApp/Controller/Root.pm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

package TestApp::Controller::Root;

use strict;
use warnings;
use base qw/Catalyst::Controller::REST/;

sub foo : Local : ActionClass('REST') {
    my ( $self, $c ) = @_;
}

sub foo_GET {
    my ( $self, $c ) = @_;
    $self->status_ok( $c, entity => { status => 1 } );
}

1;