SYNOPSIS
use HTML::AutoPagerize;
my $autopager = HTML::AutoPagerize->new;
$autopager->add_site(
url => 'http://.+.tumblr.com/',
nextLink => '//div[@id="content" or @id="container"]/div[last()]/a[last()]',
pageElement => '//div[@id="content" or @id="container"]/div[@class!="footer" or @class!="navigation"]',
);
my $uri = 'http://otsune.tumblr.com/';
my $html = LWP::Simple::get($uri);
my $res = $autopager->handle($uri, $html);
if ($res) {
my $next_link = $res->{next_link}; # URI object
my $content = $res->{page_element}; # XML::XPathEngine::NodeSet object. may be empty
}