52 |
|
|
53 |
=item --force-set |
=item --force-set |
54 |
|
|
55 |
force conversion C<normalize->path> in C<config.yml> from |
force conversion C<< normalize->path >> in C<config.yml> from |
56 |
C<.xml> to C<.pl> |
C<.xml> to C<.pl> |
57 |
|
|
58 |
=item --stats |
=item --stats |
246 |
push @{ $row->{'000'} }, $pos; |
push @{ $row->{'000'} }, $pos; |
247 |
} |
} |
248 |
|
|
249 |
my $ds = $n ? $n->data_structure($row) : |
|
250 |
WebPAC::Normalize::Set::data_structure( |
my $ds; |
251 |
|
if ($n) { |
252 |
|
$ds = $n->data_structure($row); |
253 |
|
} else { |
254 |
|
$ds = WebPAC::Normalize::Set::data_structure( |
255 |
row => $row, |
row => $row, |
256 |
rules => $rules, |
rules => $rules, |
257 |
lookup => $lookup->lookup_hash, |
lookup => $lookup->lookup_hash, |
258 |
); |
); |
259 |
|
|
260 |
|
$db->save_ds( |
261 |
|
id => $mfn, |
262 |
|
ds => $ds, |
263 |
|
prefix => $input->{name}, |
264 |
|
) if ($ds); |
265 |
|
} |
266 |
|
|
267 |
$indexer->add( |
$indexer->add( |
268 |
id => $input->{name} . "/" . $mfn, |
id => $input->{name} . "/" . $mfn, |
269 |
ds => $ds, |
ds => $ds, |