my $offset = $q->param('offset');
$offset ||= 0;
print "<p>$_</p>" foreach (@results[ $offset .. ($offset + $max) ]);