5 my ($start, $stop, $count, $group, $out, $method) = (1,1,1,50,'dynamic-reindex-script.sfsh', 'open-ils.ingest.full.biblio.record_list');
6 GetOptions ( "start=i" => \$start,
8 "groupsize=i" => \$group,
11 "method=s" => \$method,
14 $stop = $start + $count unless ($stop);
16 open SFSH, ">$out" or die("Can't open $out! $!");
19 for my $i ( $start .. $stop ) {
25 print SFSH "request open-ils.ingest $method [".join(',', @list)."]\n" if (@list);
28 print SFSH "request open-ils.ingest $method [".join(',', @list)."]\n" if (@list);