NAME

Paginator::Lite - A simple paginator

VERSION

2.0.7

SYNOPSIS

A simple tool to automate the creation of paging links

use Paginator::Lite;

my $paginator = Paginator::Lite->new({
    curr        => 3,
    items       => 65,
    frame_size  => 5,
    page_size   => 10, 
    base_url    => '/foo/items',
});

...

$paginator->first       # 1
$paginator->last        # 7
$paginator->begin       # 1
$paginator->end         # 5
$paginator->next        # 4
$paginator->prev        # 2
$paginator->base_url    # '/foo/items'

DESCRIPTION

When handle with huge amounts of data sometimes you want to display only a portion of it and provide controls to naviagte through it.

The classic way is to provide links or buttons to next, previous and some pages around the current page, like this:

(prev)  1 2 [3] 4 5 (next)

But when the number of pages grow up too much this approach may be annoying:

(prev) 1 2 3 4 5 6 7 8 9 10 [11] 12 13 14 15 16 16 18 19 20 21 (next)

So Paginator::Lite helps you calculating the numbers to feed your view loops and implements the concept of frame. A frame is a small portion of pages around the current page that will be displayed in addition to (prev), (next) and other permanent buttons:

(prev) 10 11 12 [13] 14 15 16 (next)
        \                  /
          ----- frame ----
            7 of 21 pages

METHODS

new

Creates a Paginator::Lite object.

You must provide all required arguments: base_url, curr, frame_size, items and page_size.

params is a optional argument that may be used to pass arbitrary data.

See more details about them in documentation of their respective accessors.

base_url

Returns the value of base_url. It is the same value that you must supply to constructor. This value will be used by the template to build the links to direct pages.

curr

Returns the value of current page. It is the same value that you must supply to constructor.

frame_size

Returns the value of frame_size. It is the same value that you must supply to constructor. It is also the number of pages visible around current page.

Usually frame_size may be calculated by:

my $frame_size = $pag->end - $pag->begin + 1

However when current page is too close to first or last, the frame may be deformed but still trying to center in the current page.

page_size

Returns the value of page_size. It is the same value that you must supply to constructor and means the number of items that you want display in a single page.

items

Returns the value of items. It is the same value the you must provide to constructor and means the total number of items that you are paginating.

first

Returns the value of the first page, usually 1.

last

Returns the value of the last page. This value is calculated by dividing the total amount of items by the number of items per page and then rounding up the result.

$self->{last} = ceil( $self->items / $self->page_size );

begin

Returns the value of the first page of current frame. Usually you will iterate between begin and end in your view to create direct links to those pages.

end

Returns the value of the last page of current frame.

prev

Returns the value of previous page. Usually this value is curr - 1, except when current page is 1.

next

Returns the value of next page. Usually this value is curr + 1, except when current page is last.

params

Returns arbitrary data passed to contructor by params argument.

BUILD

Private. It casts the magic when building the object.

AUTHOR

Blabos de Blebe, <blabos at cpan.org>

BUGS

Please report any bugs or feature requests to bug-paginator-lite at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Paginator-Lite. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

perldoc Paginator::Lite

You can also look for information at:

ACKNOWLEDGEMENTS

Estante Virtual http://estantevirtual.com.br

COPYRIGHT & LICENSE

Copyright 2012 Blabos de Blebe.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.