Yet Another CPAN Grep

HTML-Feature ( M/MI/MIKI/HTML-Feature-3.00011.tar.gz, MIKI, 2010; MetaCPAN )

HTML-Feature/lib/HTML/Feature/Engine/LDRFullFeed.pm ( view source; MetaCPAN )

se warnings;
use HTML::TreeBuilder::XPath;
use LWP::Simple;
use Storable qw(retrieve nstore);
use JSON;
use Encode;
use Carp;
use base qw(HTML::Feature::Base);

__PACKAGE__->mk_accessors($_) for qw(_L

          else {
                my $json =
                  get('http://wedata.net/databases/LDRFullFeed/items.json');
                my $data = from_json($json);
                nstore( $data, $pa