CPAN::Groonga

ccount details to
it.

=cut

use Future;
use Future::Utils qw(try_repeat);
use HTTP::Request;
use JSON::MaybeXS;
use Digest::SHA qw(hmac_sha512_hex sha256_hex);
use List::Util qw(pairmap);
use List::U

get(
			$self->base_url . '/api/3/depth/' . $pair
		)->then(sub {
			eval {
				my $data = $self->json->decode(shift);
				my ($lowest_ask) = nsort_by { $_->[0] } @{$data->{btc_usd}{asks}};
				my ($h

,
			ssl     => $self->ssl,
		)->then(sub {
			eval {
				my $body = shift;
				my $data = $self->json->decode($body);
				return Future->done($data->{return}) if $data->{success};
				return Future->