create JSONL for all latest CPAN modules

metacpan-latest-releases-jsonl.pl

#! /usr/bin/env nix-shell
#! nix-shell -i perl -p "with perl.pkgs; [ perl MetaCPANClient CpanelJSONXS ]"

use v5.36;
use MetaCPAN::Client;
use Data::Dumper;
use Cpanel::JSON::XS;
my $json = Cpanel::JSON::XS->new->ascii;
$json->canonical(1);
my $mcpan  = MetaCPAN::Client->new();
my $releases = $mcpan->release( {
    all => [
      { status => 'latest' },
    ],
} );

while (my $item = $releases->next) {
  my $struct = {};
  foreach (qw/ id name status author authorized
               version version_numified
               download_url checksum_sha256
               abstract dependency license
               provides distribution main_module
               stat/ ) {
    $struct->{$_} = $item->$_;
  }

  say $json->encode($struct);
}