これを使うと、データベースから取得したデータをページングするときに、効率が良くなるらしい。Windows ではテストが全部通った直後に落ちるという妙な挙動をするが、これはperl CORE のテスト・モジュールの方のバグなので気にしない。
http://asakura.g.hatena.ne.jp/asakura-t/20041219
さてページングはできるようになったが、今度はページングしたデータをHTMLにするのがめんどくさいなあ、と思ったらHTMLを書いてくれるモジュールがあった。
http://search.cpan.org/~aaronjj/Class-DBI-Plugin-HTML-0.8/HTML.pm
これをWindowsで使うにはprerequisitesが山のようにあってたいへんだ。
ppm.bat を起動してHTML-TableとHTML-FillInFormをインストールする。
次のモジュールはppmがない。CPANから根気よくダウンロードしてインストールする。
SQL-Abstract-1.17.tar.gz Class-DBI-AsForm-2.41.tar.gz Class-DBI-Plugin-0.03.tar.gz Class-DBI-Plugin-Type-0.02.tar.gz Class-DBI-Plugin-RetrieveAll-1.01.tar.gz Class-DBI-Plugin-AbstractCount-0.03.tar.gz Class-DBI-AbstractSearch-0.05.tar.gz
データベースに接続してデータベース・ハンドラーを生成 SQL文をprepare SELECT Title FROM mov1 WHERE Title LIKE 'F%' LIMIT 0,2; SQL実行 結果表示
map { print $_->Title, "\n" } Film->search_where(Title => [ { like => 'F%' } ]) ->slice(0,2) ;