Data::Paginated - paginate a list of data
my $paginator = Data::Paginated->new({ entries => \@my_list, entries_per_page => $entries_per_page, current_page => $current_page, }); my @to_print = $paginator->page_data;
Data::Paginated is a thin wrapper around Data::Pageset which adds the extra functionality of being able to get all the entries from a list that are on a given page.
my $paginator = Data::Paginated->new({ entries => \@my_list, entries_per_page => $entries_per_page, current_page => $current_page, });
This can take all the arguments that can be passed to Data::Pageset, with the exception that instead of passing simply the total number of items in question, you actually pass the items as a reference.
my @to_print = $paginator->page_data;
This returns a list of the entries that will be on the current page.
So, if you have a list of [ 1 .. 10 ], 3 entries per page, and current page is 2, this will return (4, 5, 6).
Tony Bowden
Please direct all correspondence regarding this module to: bug-Data-Paginated@rt.cpan.org
Copyright (C) 2004-2005 Kasei This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
Data::Pageset, Data::Page.
To install Data::Paginated, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Data::Paginated
CPAN shell
perl -MCPAN -e shell install Data::Paginated
For more information on module installation, please visit the detailed CPAN module installation guide.