;
use 5.006;
use warnings FATAL => 'all';
use strict;
use Carp;
use LWP::UserAgent;
use URI;
use JSON;
use Data::Dumper;
use WWW::OAuth;
use WWW::OAuth::Util qw( form_urldecode );
#use LWP::ConsoleLo
nse";
}
# get oauth1 token, these came from https://thegarth.s3.amazonaws.com/oauth_consumer.json
# and are what the Garmin Connect mobile app uses. Perhaps we should
# try to fetch these fro
1 page: " . $response->status_line
unless $response->is_success;
my $response_data = decode_json($response->content);
if (!defined $response_data->{access_token}) {
croak "couldn't find ac