view release on metacpan or  search on metacpan

t/lib/MyAssociations/Feature.pm  view on Meta::CPAN

    my $self = shift;
    $self->render( json => { data => { id => $self->req->json->{id}, name => $self->req->json->{name} } } );
}

sub read_user_feature {
    my $self = shift;
    $self->render(
        json => { data => { id => $self->stash('userId'), features => [ { id => 'mysql' }, { id => 'mails' } ] } } );
}

sub update_user_feature {
    my $self = shift;
    $self->render(
        json => { data => { id => $self->stash('userId'), feature => { id => $self->stash('featureId') } } } );
}

sub delete_user_feature {
    my $self = shift;
    $self->render(
        json => { data => { id => $self->stash('userId'), feature => { id => $self->stash('featureId') } } } );
}

t/lib/MyRest/Dog.pm  view on Meta::CPAN

sub create_dog {
    my $self = shift;
    $self->data( id => $self->req->json->{id} )->data( name => $self->req->json->{name} );
}

sub read_dog {
    my $self = shift;
    $self->render( json => { data => { id => $self->stash('dogId'), name => 'bo' } } );
}

sub update_dog {
    my $self = shift;
    $self->render( json => { data => { id => $self->stash('dogId'), name => $self->req->json->{name} } } );
}

sub delete_dog {
    my $self = shift;
    $self->render( json => { data => { id => $self->stash('dogId'), name => 'bo' } } );
}

1;