Yet Another CPAN Grep

App-Aliyun ( F/FA/FAYLAND/App-Aliyun-0.02.tar.gz, FAYLAND, 2017; MetaCPAN )

App-Aliyun/lib/MojoX/Aliyun.pm ( view source; MetaCPAN )

   my %auth_params = (
        Timestamp => sprintf("%s", DateTime->now()),
        Format    => 'JSON',
        Version   => $Version,
        SignatureMethod  => 'HMAC-SHA1',
        SignatureVersio

\%auth_params );
    $tx = $self->ua->start($tx);

    return $tx->res->json if ($tx->res->headers->content_type || '') =~ /json/;

    my $err = $tx->error;
    croak "$err->{code} response: $err->{m