はじめに 最近ようやく Mouse な実装を始めたところで(Moose もほとんどやったことない),これがなかなか楽しいので,ちょうどお仕事で必要だった「パジネーション」なクラスを書いてみたのでそのへんを晒してみます. 個人的に使いたいようにしか実装していませんw こんな感じで使いたい 「モデル」という定義にそぐわないような気もしますが,まぁあまり気にしないでください>< コントローラ内 コード中に出てくる $c->model(...) については,次をご参照ください: [perl][amon2] Amon2::Plugin::Model というのを書いて使っているので公開してみた « いわぶろ(ろてん) sub foobar { my ($class, $c) = @_; my $req = $c->req; my $page = $req->param('page') // 1; my