<%
my %opt = @_;
my $pager = '';
if ( $opt{'total'} != $opt{'num_rows'} && $opt{'maxrecords'} ) {
unless ( $opt{'offset'} == 0 ) {
$cgi->param('offset', $opt{'offset'} - $opt{'maxrecords'});
%>
Previous
<%
}
my $page = 0;
for ( my $poff = 0; $poff < $opt{'total'}; $poff += $opt{'maxrecords'} ) {
$page++;
if ( $opt{'offset'} == $poff ) {
%>
<%= $page %>
<%
} else {
$cgi->param('offset', $poff);
%>
$page
<%
}
}
unless ( $opt{'offset'} + $opt{'maxrecords'} > $opt{'total'} ) {
$cgi->param('offset', $opt{'offset'} + $opt{'maxrecords'});
%>
Next
<%
}
}
%>