记录集迭代

Question

我想使用 Perl 迭代从 MySQL 数据库返回的记录，但一次只能迭代 10 条记录。 原因是服务器组件每个请求只能处理 10 个项目。

例如：

如果查询返回 35 条记录，则 我必须在 4 个请求中发送数据：

Request #         # of Records
--------             --------
   1                    10
   2                    10
   3                    10
   4                     5

完成任务的最佳方法是什么？

Answer 1

查看 MySQL 的 LIMIT 子句。 您可以进行如下查询：

SELECT * from some_table LIMIT 0, 10;
SELECT * from some_table LIMIT 10, 10;

等，其中 LIMIT 之后的第一个数字是偏移量，第二个数字是记录数。

当然，您首先需要对总计数进行查询，并计算出需要运行选择查询多少次才能获取所有结果。

或者，在 Perl 中，您可以使用像 DBIx::Class 这样的 ORM 包，它可以通过结果集处理分页并自动检索它们。

Answer 2

您可以调整查询以选择 10 行：

select * 
from yourtable
order by idcolumn
limit 10;

迭代行时，存储您处理的行的 ID。 处理完 10 行后，获取接下来的 10 行：

select * 
from yourtable
where idcolumn > stored_id
order by idcolumn
limit 10;

继续上一个查询，直到返回的行数少于 10 行。

Answer 3

对于第一页：

SELECT  *
FROM    table1
ORDER BY
        field
LIMIT 0, 10

对于第二页：

SELECT  *
FROM    table1
ORDER BY
        field
LIMIT 10, 10

等等。