rvice::Instapaper;
use 5.008001;
use strict;
use warnings;
use OAuth::Lite::Consumer;
use JSON qw(decode_json);
use Carp qw(croak);
our $VERSION = "0.02";
my $endpoint = "https://www.instapaper.com
$self, %params) = @_;
my $res = $self->request('POST', '/bookmarks/list', \%params);
@{decode_json($res->decoded_content)->{bookmarks}};
}
sub add_bookmark {
my ($self, $url, %params) = @_;
$