Yet Another CPAN Grep

Furl-HTTP-OAuth ( A/AS/ASCRA/Furl-HTTP-OAuth-0.002.tar.gz, ASCRA, 2016; MetaCPAN )

Furl-HTTP-OAuth/old_test.pl ( view source; MetaCPAN )

#!/usr/bin/perl

use lib './lib';
use Furl::HTTP::OAuth;
use URI;
use Encode;
use JSON::XS;

my $client = Furl::HTTP::OAuth->new(
    consumer_key => "vgyYVbu7yljXXd2MZTfDmw",
    consumer_secret => "

 => $version,
    code => $code,
    message => $msg,
    headers => $headers,
    body => decode_json($body)
});


    # consumer_key => "9djdj82h48djs9d2",
    # consumer_secret => "consumersecret",

Furl-HTTP-OAuth ( A/AS/ASCRA/Furl-HTTP-OAuth-0.002.tar.gz, ASCRA, 2016; MetaCPAN )

Furl-HTTP-OAuth/real_test.pl ( view source; MetaCPAN )

#!/usr/bin/perl

use lib './lib';
use Furl::HTTP::OAuth;
use URI;
use Encode;
use JSON::XS;

my $client = Furl::HTTP::OAuth->new(
    consumer_key => "vgyYVbu7yljXXd2MZTfDmw",
    consumer_secret => "

earch?term=Food&location=San+Francisco');

use Data::Dumper;
warn Dumper({
    version => $version,
    code => $code,
    message => $msg,
    headers => $headers,
    body => decode_json($body)
});