';
use JSON;
use LWP::Protocol::Net::Curl;
use LWP::UserAgent;
use URI;
use URI::QueryParam;
use URI::Escape;
use Carp;
use Data::Dump 'dump';
# the following GET parameter keys have to be JSON encod
ed according to the
# couchDB API documentation. http://docs.couchdb.org/en/latest/api/
my @JSON_KEYS = qw(
doc_ids
key
keys
startkey
start_key
endkey
end_key
);
has 'deb
=> sub { 30 },
);
has 'json' => (
is => 'rw',
isa =>
sub { JSON->new->utf8->allow_nonref->allow_blessed->convert_blessed },
default => sub {
JSON->new->utf8->allow_nonref