Yet Another CPAN Grep

Yaadgom ( R/RE/RENTOCRON/Yaadgom-0.09.tar.gz, RENTOCRON, 2017; MetaCPAN )

Yaadgom/lib/Yaadgom.pm ( view source; MetaCPAN )

/decode/;
use JSON::MaybeXS;
use URI;
use Carp;
use Class::Trigger;

has '_json_ed' => (
    is      => 'rw',
    lazy    => 1,
    builder => '_build_json'
);

sub _build_json {
    JSON::MaybeXS->ne

dy ) = split /\n\n/, $str, 2;
    if ( $header =~ /application\/json/ && $body ) {
        $body = $self->_json_ed->encode( $self->_json_ed->decode($body) );
        $body = decode( 'utf8', $body );

com/foobar' ),
        res    => HTTP::Response->new( 200, 'OK', [ 'content-type' => 'application/json' ], '{"ok":1}' ),
    );

    # iterate over processed document, for each file.
    # NOTE: This