Yet Another CPAN Grep

App-cpangrep ( T/TS/TSIBLEY/App-cpangrep-0.07.tar.gz, TSIBLEY, 2014; MetaCPAN )

App-cpangrep/lib/App/cpangrep.pm ( view source; MetaCPAN )

ur $VERSION = '0.07';

use Config;
use URI::Escape qw(uri_escape);
use LWP::UserAgent;
use JSON qw(decode_json);
use CPAN::DistnameInfo;
use List::Util qw(sum);

our $SERVER = "http://grep.cpan.me";
o

ngth($content) . " bytes");

    my $result = eval { decode_json($content) };
    if ($@ or not $result) {
        warn "Error decoding JSON response: $@\n";
        debug($content);
        return;