Although, it is a very alpha implmentation, I would like to hear from
all of you about the API of the perl module.
Here is an example (sorry for the broken lines):
$properties=""; # No properties
#$properties="prop1 prop2 prop3";
$structure=1; # Related to -t option of swish-e
$words='test'; # search string
print "Search Results: $num_results\n";
print "$rank $filename \"$title\" $size \"$prop1\" \"$prop2\"
At this moment, this sample is working fine. There are four perl
functions (with their equivalents in C).:
SWISHE::SwishOpen: Opens the index files and returns a handle.
SWISHE::SwishSearch: Makes the search and returns the number
SWISHE::SwishNet: Reads one result
SWISHE:.SwishClose: Closes the handle
You can open as many handlers as you like.
At this moment, there are some other things to do. The
implementation is not thread-safe because there are several static
variables defined in some of the functions of swish-e. It is also
neccesary to check all the errors in a search in a better way (swish-
e issues an exit after an error too often).
If anybody wants to try or help, let me know
Received on Wed Aug 2 13:06:41 2000