view release on metacpan or  search on metacpan

CHANGES  view on Meta::CPAN

  Author: Gabriel Vieira <gabriel.vieira@gmail.com>
  Date : 2014-08-22 14:51:36 +0000

    Added search method to API::Instagram. Add API::Instagram::Search
    module 

  Change: 9d38ad15993ac27178e3ab9413ad29889ffaa45d
  Author: Gabriel Vieira <gabriel.vieira@gmail.com>
  Date : 2014-08-22 11:24:00 +0000

    Fixed 00-instagram.t error 

  Change: c5d019cd43e4e218f56f8529160f31a9de5b2680
  Author: Gabriel Vieira <gabriel.vieira@gmail.com>
  Date : 2014-08-22 11:18:15 +0000

    Now API::Instagram is a singleton. Starting version 0.010 

  Change: 3ad5168aebfb3b4f0bfbb5ea35c9804143c1001c
  Author: Gabriel Vieira <gabriel.vieira@gmail.com>
  Date : 2014-08-21 21:38:52 +0000

CHANGES  view on Meta::CPAN

  Author: Gabriel Vieira <gabriel.vieira@gmail.com>
  Date : 2014-08-19 22:37:32 +0000

    Many bug fixes; Better cache management; Starting version 0.008' 

  Change: 3d4f7c2554f544dfbf1607279d96ad908ec7a483
  Author: Gabriel Vieira <gabriel.vieira@gmail.com>
  Date : 2014-08-17 11:26:38 +0000

    Fixed profile_picture method on API::Instagram::User. Objects
    creation returns undef when Instagram returns an error during
    request. API::Instagram::User keeps user previous data when attempt
    to reload fails. Starting version 0.007. 

  Change: ee143d09d124ba0f37b4710008b43d79d786ff73
  Author: Gabriel Vieira <gabriel.vieira@gmail.com>
  Date : 2014-08-17 01:37:20 +0000

    Removed use API::Instagram::Direct request 

  Change: 905fe6e5d9a8c1a161372a85a297e785f11113b0

lib/API/Instagram.pm  view on Meta::CPAN

	}

	# For debugging purposes
	print "Requesting: $url$/" if $self->_debug;

	# Treats response content
	my $res = decode_json $self->_ua->$method( $url, [], $params )->decoded_content;

	# Verifies meta node
	my $meta = $res->{meta};
	carp "$meta->{error_type}: $meta->{error_message}" if $meta->{code} ne '200';

use Data::Dumper;
# die Dumper $res;
	$res;
}

sub _request_data { shift->_request(@_)->{data} || {} }

sub _del  { shift->_request_data( 'delete', @_ ) }
sub _get  { shift->_request_data( 'get',    @_ ) }