Displaying 1 result from an estimated 1 matches for "swebmd".
Did you mean:
webmd
2007 Feb 02
1
Working demo of search engine using boolean query.
...-----#
# Perl Search Script
#------------------------------------------------------------------------------#
#!/usr/bin/perl -w
use strict;
use ExtUtils::testlib;
use Search::Xapian qw/:all/;
#------------------------------------------------------------------------------#
my $primary_terms = "Swebmd.com Shealth.com Smyhealthcare.com
Shealthfinder.gov";
my $secondary_terms = "fitness Diseases diet science ";
$secondary_terms =~ tr/A-Z/a-z/; # convert to lower case
#------------------------------------------------------------------------------#
my $db = Search::Xapian::Database-...