CPAN::Groonga

;
use HTTP::Tinyish;
use IPC::Run3 ();
use JSON ();
use Parse::LocalDistribution;
use Parse::PMFile;

use constant WIN32 => $^O eq 'MSWin32';

my $JSON = JSON->new->canonical(1)->utf8(1);
my $CACHE_VE

urn (undef, "$res->{status} $res->{reason}, $url") unless $res->{success};
    my $hash = eval { $JSON->decode($res->{content}) };
    if ($@) {
        return (undef, $@);
    } else {
        return

my ($self, $dir, $option) = @_;
    my $metafile = File::Spec->catfile($dir, "META.json");
    die "Missing META.json in $dir" unless -f $metafile;
    my $meta = CPAN::Meta->load_file($metafile);
   

 @dist);
    my $wanted = sub {
        my $name = $_;
        return if !-f $name or $name =~ /\.json$/;
        my $stat = File::stat::stat($name);
        if ($name =~ /02packages.details.txt.gz$/)