Subject: | paging problem |
I proceed 3 pattern search.
result is;
setting : search result(Item Number)
a. max_pages => 3, page => 1 : No.1~30
b. max_pages => 3, page => 2 : No.11~30
c. max_pages => 3, page => 4 : No.31~40
I want to change result that;
setting : search result(Item Number)
a. max_pages => 3, page => 1 : No.1~30
b. max_pages => 3, page => 2 : No.31~60
c. max_pages => 3, page => 4 : No.91~120
I fix Net::Amazon::request in my local.
that is;
my $url = URI->new($self->intl_url($request->amzn_xml_url()));
#del my $page = $request->page();
my $page = ( $request->page() - 1 ) * $self->{max_pages} + 1;
my $ref;
my $max_pages_in_this_search = $self->{max_pages} + $page - 1; #add
~omission~
# Stop if we've fetched max_pages already
/* delete start
if(defined $page && $self->{max_pages} <= $page) {
DEBUG("Fetched max_pages ($self->{max_pages}) -- stopping");
last;
}
delete end */
/* add start */
if(defined $page && $max_pages_in_this_search <= $page) {
DEBUG("Fetched max_pages ($max_pages_in_this_search) --
stopping");
last;
}
/* add end */