DBIx::Skinnyにgroup_byをoptでつけれるようにした
/Library/Perl/5.10.0/DBIx/Skinny.pm
400+ if (my $terms = $opt->{group_by}) { 401+ my @groups; 402+ for my $term (@{$terms}) { 403+ push @groups, { column => $term }; 404+ } 405+ $rs->group(\@groups); 406+ }
usage:
my $result = $self->model->search( 'data_mst', $params, { group_by => ['code'], } );