File Coverage

blib/lib/Net/Iugu/CRUD.pm

Criterion	Covered	Total	%
statement	3	17	17.6
branch			n/a
condition			n/a
subroutine	1	6	16.6
pod			n/a
total	4	23	17.3

package Net::Iugu::CRUD;
$Net::Iugu::CRUD::VERSION = '0.000001';
use Moo;
extends 'Net::Iugu::Request';

sub create {
    my ( $self, $data ) = @_;

    my $uri = $self->endpoint;

    return $self->request( POST => $uri, $data );
}

sub read {
    my ( $self, $object_id ) = @_;

    my $uri = $self->endpoint . '/' . $object_id;

    return $self->request( GET => $uri );
}

sub update {
    my ( $self, $object_id, $data ) = @_;

    my $uri = $self->endpoint . '/' . $object_id;

    return $self->request( PUT => $uri, $data );
}

sub delete {
    my ( $self, $object_id ) = @_;

    my $uri = $self->endpoint . '/' . $object_id;

    return $self->request( DELETE => $uri );
}

sub list {
    my ( $self, $params ) = @_;

    return $self->request( GET => $self->endpoint, $params );
}

1;

# ABSTRACT: Net::Iugu::CRUD - Methods for basic CRUD

__END__