Yet Another CPAN Grep

Finance-GDAX-Lite ( P/PE/PERLANCAR/Finance-GDAX-Lite-0.003.tar.gz, PERLANCAR, 2018; MetaCPAN )

Finance-GDAX-Lite/lib/Finance/GDAX/Lite.pm ( view source; MetaCPAN )


    }

    require HTTP::Tiny;
    $self->{_http} = HTTP::Tiny->new;

    require JSON::XS;
    $self->{_json} = JSON::XS->new;

    require URI::Encode;
    $self->{_urienc} = URI::Encode->new;


    my $encoded_body = '';
    if ($method eq 'POST') {
        $body = $encoded_body = $self->{_json}->encode($params);
    } else {
        if (keys %$params) {
            my $qs = '?' . join(

phrase}) x !!$is_private,,
            "Content-Type"   => "application/json",
            "Accept"         => "application/json",
        },
        (content => $body) x !!defined($body),
    };