blog.scrapcode.net: DBIでデータベースの内容をハッシュ配列で取得する今時のPerl使いの方は、データベースアクセスにはClass::DBIを使っているのでしょうか？ ボクは仕事柄Class::DBIを使えないサーバーで動かすCGIを作ることが多いので、今でもDBIを使っています。Class::DBIも勉強しなきゃなぁ…。 それはともかく、SELECT文の結果をハッシュ配列で取得する方法を書いてみます。 バージョン1.20より古いDBIでは、$dbhをデータベースハンドルオブジェクトとした場合my $sql = 'SELECT id, name FROM test WHERE age < ?'; my $rows = $dbh->selectall_hashref( $sql, undef, 20 );のようなプログラムで$rows = [ { id => 1, name => 'aaaa' }, { id => 2, name => 'bbbb' }, ]
