ails.
=cut
our %BUGS = (
'not_dopplr_any_more' => {
'cuddled' => 1,
'json_response' => 1,
},
);
sub new {
my $class = shift;
my %params = @_;
$params{_u
f ($opts{_compat}->{json_response}) {
eval 'use JSON::Any';
die "You need to install JSON::Any to use JSON responses" if $@;
%values = %{JSON::Any->from_json($response->content