147 |
$hash->{$f} = join(' <*> ', @{ $hash->{$f} }); |
$hash->{$f} = join(' <*> ', @{ $hash->{$f} }); |
148 |
} |
} |
149 |
# $hash->{$f} = decode( $self->encoding, $hash->{$f} ); |
# $hash->{$f} = decode( $self->encoding, $hash->{$f} ); |
150 |
|
$self->{field_count}->{$f}++; |
151 |
} |
} |
152 |
|
|
153 |
$log->debug("add( $id, ", sub { dump($ds) }," ) => ", sub { dump( $hash ) }); |
$log->debug("add( $id, ", sub { dump($ds) }," ) => ", sub { dump( $hash ) }); |
174 |
|
|
175 |
$log->info("indexed ", $self->{count}, " records"); |
$log->info("indexed ", $self->{count}, " records"); |
176 |
|
|
177 |
|
$log->debug("field usage: ", dump( $self->{field_count} )); |
178 |
|
|
179 |
} |
} |
180 |
|
|
181 |
=head1 AUTHOR |
=head1 AUTHOR |