Paul a écrit, I'm trying to put together this script to rebuild our marc_word table and I'd like to get some feedback ... I get the following error when I run the script: Use of uninitialized value in substitution (s///) at /usr/local/koha/intranet/modules//C4/Biblio.pm line 947. Use of uninitialized value in split at /usr/local/koha/intranet/modules//C4/Biblio.pm line 948. Is this a bug in Biblio.pm or am I not using this MARCaddword sub correctly? Here's my script (any suggestions?): #!/usr/bin/perl -w #----------------------------------- # Script Name: build_marc_word.pl # Script Version: 0.1.0 # Date: 2004/06/05 # Author: Joshua Ferraro [jmf at kados dot org] # Description: builds a new marc_word table that # allows for increased searching # accuracy. # Usage: build_marc_word.pl # Revision History: # 0.1.0 2004/06/05: original version; only uses # tag 100 #----------------------------------- use lib '/usr/local/koha/intranet/modules/'; use strict; use C4::Context; use C4::Biblio; my $dbh=C4::Context->dbh; #FIXME: for now tag 100 is hardcoded; eventually I plan #to derive a list of tags (and subfields?) from an outfile my $tag="100"; #get the required data from marc_subfield_table ordered by tag,subfield? not #sure if that's right ... my $query="SELECT bibid,tag,tagorder,subfieldid,subfieldorder,subfieldvalue FROM marc_subfield_table WHERE tag=? ORDER BY tag, subfieldid"; my $sth=$dbh->prepare($query); #Store the data in array @stuff for manipulation and (later) insertion my @stuff=$sth->execute($tag); #for each row ... while (my ($data)=$sth->fetchrow_array) { #define the variables to prepare for insertion my $bibid=$stuff[0]; my $tag=$stuff[1]; my $tagorder=$stuff[2]; my $subfieldid=$stuff[3]; my $subfieldorder=$stuff[4]; my $sentence=$stuff[5]; #insert the row into marc_word using Biblio.pm's MARCaddword sub MARCaddword($dbh,$bibid,$tag,$tagorder,$subfieldid,$subfieldorder,$sentence); } #that's all folks ... $dbh->disconnect(); On Fri, Jun 04, 2004 at 04:03:50PM +0200, Paul POULAIN wrote:
Stephen Hedges a écrit :
Paul, Joshua has convinced me that 1 letter indexing produces better results than anything else we've discussed so far.
OK, I note it unless otherwise stated. PS : I also note to add to framework management a checkbox "do not index this field". That's the main stuff...
-- Paul POULAIN Consultant indépendant en logiciels libres responsable francophone de koha (SIGB libre http://www.koha-fr.org)
------------------------------------------------------- This SF.Net email is sponsored by the new InstallShield X.
From Windows to Linux, servers to mobile, InstallShield X is the one installation-authoring solution that does it all. Learn more and evaluate today! http://www.installshield.com/Dev2Dev/0504
Koha-devel mailing list Koha-devel@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/koha-devel