Yet Another CPAN Grep

Search-OpenSearch-Federated ( K/KA/KARMAN/Search-OpenSearch-Federated-0.007.tar.gz, KARMAN, 2014; MetaCPAN )

Search-OpenSearch-Federated/lib/Search/OpenSearch/Federated.pm ( view source; MetaCPAN )

SION} );

use Carp;
use Data::Dump qw( dump );
use Parallel::Iterator qw( iterate_as_array );
use JSON;
use LWP::UserAgent;
use Scalar::Util qw( blessed );
use Search::Tools::XML;
use Data::Transforme

       my $highest_score = 0;

        if ( $resp->content_type eq 'application/json' ) {
            my $r = decode_json( $resp->content );
            if ( $r->{results} ) {
                @resp_re