http://d.hatena.ne.jp/naoya/20080419/1208579525 naoyaさんのをふと思い出してDBICでの出来るように書いてみた次第。 DBIx::MoCoの場合とは異なりDBICの場合は、 searchメソッドから戻ってくるものはスカラーコンテキストではResultSetなので 無理矢理DBIC::ResultSetにmapメソッドを生やしてみた。 package DBIx::Class::RowCollection; use strict; use warnings; use base 'DBIx::Class'; our $VERSION = '0.01'; { use DBIx::Class::ResultSet; package DBIx::Class::ResultSet; use Params::Validate qw/:all/; use