CatalystX-Widget-Paginator
view release on metacpan or search on metacpan
lib/CatalystX/Widget/Paginator.pm view on Meta::CPAN
With paginated L<DBIx::Class::ResultSet> instance:
my $pg = $c->widget( 'Paginator',
rs => $c->model('Schema::User')->search_rs( undef, { rows => 3, page => 15 )
);
Handling invalid page:
use Try::Tiny;
my $pg = try {
$c->widget( 'Paginator',
rs => 'Schema::User',
invalid => 'raise'
)
} except {
$c->detach('/error404') if /PAGE_OUT_OF_RANGE/;
die $_;
};
( run in 0.834 second using v1.01-cache-2.11-cpan-05444aca049 )