pe qw(uri_escape);
use LWP::UserAgent;
use Carp qw(croak);
use Digest::SHA qw(sha256_base64);
use JSON;
=head1 NAME
WebService::Ooyala - Perl interface to Ooyala's API, currently only read
operation
path, $body, $params) = @_;
my $path = "/" . $self->{api_version} . "/" . $relative_path;
my $json_body = {};
my $url =
$self->build_path_with_authentication_params($http_method, $path,
$par
ailed to GET $full_url - " . $resp->status_line;
}
if ($resp->is_success) {
return decode_json($resp->decoded_content);
}
} else {
croak
"Trying to call a method that is not implemente