NAME¶
HTML::AutoPagerize - Utility to load AutoPagerize SITEINFO stuff
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
}
DESCRIPTION¶
HTML::AutoPagerize is an utility module to load SITEINFO defined in
AutoPagerize. AutoPagerize is an userscript to automatically figure out the
"next link" of the current page, then fetch the content and insert
the content by extracting the "page element".
AUTHOR¶
Tatsuhiko Miyagawa <miyagawa@bulknews.net>
LICENSE¶
This library is free software; you can redistribute it and/or modify it under
the same terms as Perl itself.