Yet Another CPAN Grep

Parse-LocalDistribution ( I/IS/ISHIGAKI/Parse-LocalDistribution-0.20.tar.gz, ISHIGAKI, 2024; MetaCPAN )

Parse-LocalDistribution/lib/Parse/LocalDistribution.pm ( view source; MetaCPAN )

  my @manifind = @{$self->{MANIFOUND}};

  my $json = List::Util::reduce { length $a < length $b ? $a : $b }
             grep !m|/t/|, grep m|/META\.json$|, @manifind;
  my $yaml = List::Util::reduce

.json located only in a subdirectory should not precede
  # META.yml located in the top directory. (eg. Test::Module::Used 0.2.4)
  if ($json && $yaml && length($json) > length($yaml) + 1) {
    $json


  unless ($json || $yaml) {
    $self->{METAFILE} = "No META.yml or META.json found";
    $self->_verbose(1,"No META.yml or META.json in $dist");
    return;
  }

  for my $metafile ($json || $yaml)