package Net::Semantics3;
use strict;
use warnings;
use Moose;
use methods;
use JSON::XS;
use OAuth::Lite::Consumer;
use Data::Dumper;
use Switch;
use Net::Semantics3::Error;
our $VERSION = '0.1';
);
method _request {
my ( $path, $jsonParams, $verb ) = @_;
switch ($verb) {
case "GET" { return $self->_make_request('GET', $path, $jsonParams); }
case "PUT" { retu
, $path, $jsonParams); }
case "POST" { return $self->_make_request('POST', $path, $jsonParams); }
case "DELETE" { return $self->_make_request('DELETE', $path, $jsonParams);
package Net::Semantics3::Products;
use Moose;
use methods;
use JSON::XS;
use Data::Dumper;
use Net::Semantics3::Error;
extends 'Net::Semantics3';
use constant MAX_LIMIT => 10;
=head1 NAME
Net::Se
( 'products' );
=head3 get_query_json( ENDPOINT )
Returns the JSON string of the constructed query for the specified endpoint.
my $productsJSON = get_query_json( 'products' );
=head3 get_resul
get_results( );
=head3 get_results_json( )
Returns the JSON string of the results from any previously executed query.
my $resultsJSONString = get_results_json( );
=head3 clear( )
Clears previ