The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

HTML::Split::Pager - Pager that contains splitted HTMLs.

SYNOPSIS

  use HTML::Split::Pager;

  my $html = <<HTML;
  <div class="pkg">
  <h1>HTML::Split</h1>
  <p>Splitting HTML by number of characters.</p>
  </div>
  HTML;

  my $pager = HTML::Split::Pager->new(html => $html, lenght => 50);
  print $pager->text;

DESCRIPTION

CLASS METHODS

new

Create an instance of HTML::Split. Accept same arguments as split method.

INSTANCE METHODS

current_page

Set/Get current page.

total_pages

Return the number of total pages.

next_page

Return the next page number. If the next page doesn't exists, return undef.

prev_page

Return the previous page number. If the previous page doesn't exists, return undef.

text

Return the text of current page.

AUTHOR

Hiroshi Sakai <ziguzagu@cpan.org>

LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.