DBICのpopulateメソッド

Perl

スクリプトでデータを一括していれるときに



for my $hoge (@hoges) {

    $self->model('Model')->create({ hoge => 1, moge => $hoge->moge, soge => $hoge->soge });

}

って感じでやるとおもうんだけど、DBICでは
こんなのでもできる。



$self->model->populate('Model',[

    [qw/hoge moge soge/],

    map [1, $_->moge, $_->soge], @hoges,

]);

とかける。


ちなみに$self->modelとか書いてますが、
これはhttp://code.mfac.jp/trac/browser/MoFedge-Data-DBIC-Schema/
こいつを使ってます。

んーてか違うこと調べてたのに脱線したｗ