Yet Another CPAN Grep

P5U-Command-Changes ( T/TO/TOBYINK/P5U-Command-Changes-0.002.tar.gz, TOBYINK, 2013; MetaCPAN )

P5U-Command-Changes/lib/P5U/Command/Changes.pm ( view source; MetaCPAN )

b opt_spec
{
	(
		[verbatim => 'show the Changes file verbatim'],
	);
}

sub _metacpan
{
	require JSON;
	require LWP::UserAgent;
	my ($self, @path) = @_;
	state $ua = LWP::UserAgent->new(
		agent => s

/$path");
	$r->is_success or die("HTTP request failed");
	if ($r->content_type =~ /json/i)
	{
		return JSON::from_json( $r->decoded_content );
	}
	else
	{
		return $r->decoded_content;
	}
}

my $DATE