Yet Another CPAN Grep

App-cpangitify ( P/PL/PLICEASE/App-cpangitify-0.20.tar.gz, PLICEASE, 2022; MetaCPAN )

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

ss qw( file dir );
use Git::Wrapper;
use File::Temp qw( tempdir );
use File::chdir;
use JSON::PP qw( decode_json );
use URI;
use PerlX::Maybe qw( maybe );
use File::Copy::Recursive qw( rcopy );
use Fi

or fetching $uri";
      say $res->{reason};
      return 2;
    }
    $cache->{$cpanid} = decode_json($res->{content})
  }

  my $email = $cache->{$cpanid}->{email};
  $email = $email->[0] if ref($em