escription => 'API Authentication error, your request signature is invalid',
},
);
use JSON qw(decode_json);
use List::Util qw(first sum);
use LWP::UserAgent;
use Module::Load qw(load);
use Moo;
u
(is => 'rw'); # The HTTP Request (PSGI env) that is being evaluated
has '_json' => (is => 'rw'); # The raw json response from the server
has '_report_data' => (is => 'rw', def
;
}
my $request_path = @{$self->_search_capabilities} == 0
? '/v1/json/'
: '/v1/json/search:(' . join(',', @{$self->_search_capabilities}) . ')';
# Prepare reques
package Net::WURFL::ScientiaMobile::Cache::Cookie;
use Moo;
use JSON qw(decode_json encode_json);
use Plack::Request;
with 'Net::WURFL::ScientiaMobile::Cache';
has 'cookie_name' => (is => 'rw
return 0 unless $request->cookies->{$self->cookie_name};
my $cookiedata = eval { decode_json($request->cookies->{$self->cookie_name}) };
return 0 unless ref $cookiedata eq 'HASH';
re
abilities => $capabilities,
};
$self->cookies({
$self->cookie_name => encode_json($data),
});
}
sub setDeviceFromID { 1 }
sub getMtime { 0 }
sub setMtime { 1 }