Yet Another CPAN Grep

Yandex-Disk ( V/VR/VRAG/Yandex-Disk-0.07.tar.gz, VRAG, 2019; MetaCPAN )

Yandex-Disk/lib/Yandex/Disk.pm ( view source; MetaCPAN )

se warnings;
use utf8;
use Yandex::Disk::Public;
use Carp qw/croak carp/;
use LWP::UserAgent;
use JSON::XS;
use File::Basename;
use URI::Escape;
use Encode;
use IO::Socket::SSL;
use Term::Sk;

our $VE

k perl module");
    $ua->default_header('Accept' => 'application/json');
    $ua->default_header('Content-Type'  => 'application/json');
    $ua->default_header('Connection'    => 'keep-alive');

/';
    my $res = $self->__request($url, "GET");
    if ($res->is_success) {
        return __fromJson($res->decoded_content);
    }
    else {
        croak "Cant execute request to $url: " . $res->s