何十万件もあるデータで my $limit = 1000; my $offset = 0; while(1) { my $rs = models("Schema::Hoge")->search({},{ limit => 1000, offset => $offset, }); last if $rs->count <= 0; while(my $row = $rs->next) { #何らかの処理 ... } $offset+= $lim…