RSION = '0.0304';
use strictures 2;
use Carp qw(croak);
use Mojo::UserAgent ();
use Mojo::JSON qw(decode_json);
use Mojo::URL ();
use Moo;
use Try::Tiny;
use namespace::clean;
has key => (
is
if ( $res->is_success ) {
my $body = $res->body;
try {
$data = decode_json($body);
}
catch {
croak $body, "\n";
};
}
else {
tests in F<t/01-methods.t>
L<https://developers.google.com/youtube/v3/docs/search/list>
L<Mojo::JSON>
L<Mojo::URL>
L<Mojo::UserAgent>
L<Moo>
L<Try::Tiny>
=head1 AUTHOR
Gene Boggs <gene@cpan.or