DBIx::Classのページング処理 - 高知ではたらくひとのブログ現在、DBIx::ClassとTemplate Toolkitを勉強しているところですが、ページングの処理が驚くほど簡単に書けるので自分用のメモを残しておきます。 CGI側でresultsetオブジェクトに対しpager()をコールすることで、Data::Pageオブジェクトを取得できます。 my $q = CGI->new; my $schema = App::Schema->connect; my $iterator = $schema->resultset('Comment')->search({}, {rows => 5}); # 1ページ辺りの行数は5 my $page = $q->param('page') || 1; my $rs = $it->page($page); # 1ページ目のresultsetオブジェクトを取得 print $q->header('text/htm
