e CPAN::WWW::Testers;
use DateTime;
use DBI;
use File::Copy;
use File::stat;
use File::Slurp;
use JSON::Syck;
use LWP::Simple;
use Parse::BACKPAN::Packages;
use Path::Class;
use Template;
use Storable
ile( $directory, 'show', $distribution . ".json" );
print "Writing $destfile\n";
overwrite_file( $destfile->stringify,
_make_json_distribution( $distribution, \@reports ) )
-' . $entry->{version};
push @yaml, $entry;
}
return Dump( \@yaml );
}
sub _make_json_distribution {
my ( $dist, $data ) = @_;
my @data;
foreach my $test (@$data) {