######################################################################
Rose::DBx::Object::InternalPager 0.03
######################################################################
NAME
Rose::DBx::Object::InternalPager - Throttle Rose DB Iterator Fetching
SYNOPSIS
use Rose::DBx::Object::InternalPager;
my $pager = Rose::DBx::Object::InternalPager->new(
class_name => "Namespace::Author",
manager_method => "get_authors",
manager_options => {
query => [ published => 'yes' ],
require_objects => [ 'city_of_birth' ],
sort_by => 'last_name',
},
);
while(my $author = $pager->next()) {
print $author->first_name(), " ",
$author->last_name(), " ",
$author->city_of_birth->string(), "\n";
}
DESCRIPTION
"Rose::DBx::Object::InternalPager" is a 3rd party module for "Rose::DB"
iterators to work around MySQL client's limited control over how many
rows are fetched from the database at a time.
"Rose::DBx::Object::InternalPager" provides a hack to limit the number
of fetched records and prevents programs from running out of memory.
The pager creates an iterator object, similar to the Rose "Manager"'s
"get_xxx_iterator()", method. Except, behind the scenes, the pager makes
sure to never fetch more than a preset number of records from the
database at a time. To accomplish this, it uses LIMIT to limit the
number of records retrieved, and OFFSET to fetch the next batch.
This approach might lead to anomalies when the database gets modified
while the pager is at work, and this is the reason why this module has
been released *outside* of the "Rose::DB" realm as a 3rd party module.
While normally, you would call
my $itr = Namespace::Author::Manager->get_authors_iterator(...);
to get an iterator object which offers a "next()" method to move from
one database record to the next. With
"Rose::DBx::Object::InternalPager", you call
my $pager = Rose::DBx::Object::InternalPager->new(
class_name => "Namespace::Author", # Note: no 'Manager'
manager_method => "get_authors", # Note: no 'iterator'
# ...
);
which returns a pager object that can be used to iterate over all
database records found via
while(my $author = $pager->next()) {
# ...
}
Just as the manager's "get_xxx_iterator()" method offers ways to modify
the query with "query", "sort_by" and other parameters, these parameters
can be set with the pager by using the "manager_options" parameter:
my $pager = Rose::DBx::Object::InternalPager->new(
class_name => "Namespace::Author", # Note: no 'Manager'
manager_method => "get_authors", # Note: no 'iterator'
manager_options => {
query => [ published => 'yes' ],
require_objects => [ 'city_of_birth' ],
sort_by => 'last_name',
},
);
By default, the pager fetches 50 records at a time. This value can be
modified by setting the "per_page" parameter in the optional
"pager_options" hash:
my $pager = Rose::DBx::Object::InternalPager->new(
# ...
pager_options => {
per_page => 100,
},
);
By default, the pager starts at page 1. This value can be modified by
setting the "start_page" parameter in the optional "pager_options" hash:
my $pager = Rose::DBx::Object::InternalPager->new(
# ...
pager_options => {
start_page => 17,
},
);
WHY THIS MODULE?
Even with "mysql_use_result" set, I've found that with large database
tables, clients run out of memory when they want to iterate over all
records of a table. At the cost of eventually creating anomalies, the
pager provides fine-grained control over the amount of memory used by
the database client application.
DISCLAIMER
Note that while this module uses "Rose::DB", it was released and will be
maintained *separately* from John Siracusa's project.
LEGALESE
Copyright 2007 by Mike Schilli, all rights reserved. This program is
free software, you can redistribute it and/or modify it under the same
terms as Perl itself.
AUTHOR
2007, Mike Schilli <m@perlmeister.com>