Automatic pagination using autopagerize
use WWW::Mechanize::AutoPager; my $mech = WWW::Mechanize->new; # Load siteinfo from http://swdyh.infogami.com/autopagerize $mech->autopager->load_siteinfo(); # Or, load manually $mech->autopager->add_site( url => 'http://.+\.tumblr\.com/', nextLink => ..., ); $mech->get('http://otsune.tumblr.com/'); if (my $link = $mech->next_link) { $mech->get($link); $mech->page_element; # HTML snippet }
WWW::Mechanize::AutoPager is a plugin for WWW::Mechanize to do automatic pagination using AutoPagerize user script.
\s-1THIS\s0 \s-1MODULE\s0 \s-1IS\s0 \s-1CONSIDERED\s0 \s-1EXPERIMENTAL\s0 \s-1AND\s0 \s-1ITS\s0 \s-1API\s0 \s-1WILL\s0 \s-1BE\s0 \s-1LIKELY\s0 \s-1TO\s0 \s-1CHANGE\s0
Tatsuhiko Miyagawa <[email protected]>
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
HTML::AutoPagerize, <http://swdyh.infogami.com/autopagerize>