Changeset 2529


Ignore:
Timestamp:
2001-06-13T10:26:10+12:00 (23 years ago)
Author:
sjboddie
Message:

added quoting to system calls in phind classifier - needed when Greenstone
is installed to a directory containing spaces

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/gsdl/perllib/classify/phind.pm

    r2510 r2529  
    362362    # Use the suffix program to generate the phind/phrases file
    363363    print $out "\nExtracting phrases from processed text (with suffix)\n" if $verbosity;
    364     &execute("suffix $phinddir $suffixmode $verbosity", $verbosity, $out);
     364    &execute("suffix \"$phinddir\" $suffixmode $verbosity", $verbosity, $out);
    365365
    366366    # Create the phrase file and put phrase numbers in phind/phrases
    … …  
    372372    my $mg_stem = &util::filename_cat($phinddir, "pdata");
    373373
    374     &execute("mgpp_passes $osextra -f $mg_stem -T1 $mg_input", $verbosity, $out);
    375     &execute("mgpp_compression_dict $osextra -f $mg_stem", $verbosity, $out);
    376     &execute("mgpp_passes $osextra -f $mg_stem -T2 $mg_input", $verbosity, $out);
     374    &execute("mgpp_passes $osextra -f \"$mg_stem\" -T1 \"$mg_input\"", $verbosity, $out);
     375    &execute("mgpp_compression_dict $osextra -f \"$mg_stem\"", $verbosity, $out);
     376    &execute("mgpp_passes $osextra -f \"$mg_stem\" -T2 \"$mg_input\"", $verbosity, $out);
    377377
    378378    # create the mg index of words
    … …  
    381381    $mg_stem = &util::filename_cat($phinddir, "pword");
    382382
    383     &execute("mgpp_passes $osextra -f $mg_stem -T1 -I1 $mg_input", $verbosity, $out);
    384     &execute("mgpp_compression_dict $osextra -f $mg_stem", $verbosity, $out);
    385     &execute("mgpp_perf_hash_build $osextra -f $mg_stem", $verbosity, $out);
    386     &execute("mgpp_passes $osextra -f $mg_stem -T2 -I2 $mg_input", $verbosity, $out);
    387     &execute("mgpp_weights_build $osextra -f $mg_stem", $verbosity, $out);
    388     &execute("mgpp_invf_dict $osextra -f $mg_stem", $verbosity, $out);
    389 
    390     &execute("mgpp_stem_idx $osextra -f $mg_stem -s 1", $verbosity, $out);
    391     &execute("mgpp_stem_idx $osextra -f $mg_stem -s 2", $verbosity, $out);
    392     &execute("mgpp_stem_idx $osextra -f $mg_stem -s 3", $verbosity, $out);
     383    &execute("mgpp_passes $osextra -f \"$mg_stem\" -T1 -I1 \"$mg_input\"", $verbosity, $out);
     384    &execute("mgpp_compression_dict $osextra -f \"$mg_stem\"", $verbosity, $out);
     385    &execute("mgpp_perf_hash_build $osextra -f \"$mg_stem\"", $verbosity, $out);
     386    &execute("mgpp_passes $osextra -f \"$mg_stem\" -T2 -I2 \"$mg_input\"", $verbosity, $out);
     387    &execute("mgpp_weights_build $osextra -f \"$mg_stem\"", $verbosity, $out);
     388    &execute("mgpp_invf_dict $osextra -f \"$mg_stem\"", $verbosity, $out);
     389
     390    &execute("mgpp_stem_idx $osextra -f \"$mg_stem\" -s 1", $verbosity, $out);
     391    &execute("mgpp_stem_idx $osextra -f \"$mg_stem\" -s 2", $verbosity, $out);
     392    &execute("mgpp_stem_idx $osextra -f \"$mg_stem\" -s 3", $verbosity, $out);
    393393
    394394    # create the mg document information database
    … …  
    397397    $mg_stem = &util::filename_cat($phinddir, "docs");
    398398
    399     &execute("mgpp_passes $osextra -f $mg_stem -T1 $mg_input", $verbosity, $out);
    400     &execute("mgpp_compression_dict $osextra -f $mg_stem", $verbosity, $out);
    401     &execute("mgpp_passes $osextra -f $mg_stem -T2 $mg_input", $verbosity, $out);
     399    &execute("mgpp_passes $osextra -f \"$mg_stem\" -T1 \"$mg_input\"", $verbosity, $out);
     400    &execute("mgpp_compression_dict $osextra -f \"$mg_stem\"", $verbosity, $out);
     401    &execute("mgpp_passes $osextra -f \"$mg_stem\" -T2 \"$mg_input\"", $verbosity, $out);
    402402
    403403    # Return the information about the classifier that we'll later want to
Note: See TracChangeset for help on using the changeset viewer.