CPAN::Groonga

--minimum      Report based on minimum (default recommended)";
    say "    -j F  --json=F       Use downloaded JSON instead of fetching";
    say "    -p    --perl         Report CVE's on required pe

version";
    say "    -v[#] --verbose[=#]  Set verbosity level";
    say "    -J F  --json-out=F   Output in JSON file F (- = STDOUT)";
    say "";
    say "For CVE's in the perl core, please use --p

    say "Documentation should still be written";
    exit $err;
    } # usage

use Test::CVE;
use JSON::MaybeXS;
use Module::CoreList;
use Cwd          qw( getcwd abs_path);
use Getopt::Long qw(:confi

,
    cpansa   => "https://cpan-security.github.io/cpansa-feed/cpansa.json",
    cpanfile => "cpanfile",
    meta_jsn => "META.json",
    meta_yml => "META.yml",     # NYI
    make_pl  => "Makefile.PL

use warnings;

our $VERSION = "0.11";

use version;
use Carp;
use HTTP::Tiny;
use Text::Wrap;
use JSON::MaybeXS;
use Module::CoreList;
use YAML::PP     ();
use List::Util qw( first uniq );
use base   

;
    my %self  = @_;
    $self{cpansa}   ||= "https://cpan-security.github.io/cpansa-feed/cpansa.json";
    $self{deps}     //= 1;
    $self{perl}     //= 1;
    $self{core}     //= 1;
    $self{mini