dannoura has asked for the wisdom of the Perl Monks concerning the following question:
Hi,
I'm trying to use the module WWW::Search with the backend WWW::Search::Altavista, using the code:
#! c:\perl\bin use WWW::Search; my $oSearch = new WWW::Search('AltaVista'); my $sQuery = 'Ohio sushi restaurant'; $oSearch->native_query(WWW::Search::escape_query($sQuery)); my $response = $oSearch->response(); if ($response->is_success) { print "Page returned ok"; } else { print "error: " . $response->as_string(); } while (my $oResult = $oSearch->next_result()) { print $oResult->url, "\n"; } $oSearch->logout;
And I get:
Page returned okBut no results (yes, there are sushi restaurants in Ohio). I tried:
my @asEngines = sort &WWW::Search::installed_engines(); local $" = ', '; print (" + These WWW::Search backends are installed: @asEngines\n");
Which gives:
+ These WWW::Search backends are installed: AltaVista, AltaVista::AdvancedNews, AltaVista::AdvancedWeb, AltaVista::Intranet, AltaVista::Intranet3, AltaVista::NL, AltaVista::News, AltaVista::Web, Null, Null::Count, Null::Empty, Null::Error, PubMed, SimpleSo I know the engine is installed, but I get no results. Any ideas as to what the problem may be?
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: searching altavista
by gjb (Vicar) on Jul 03, 2003 at 07:43 UTC | |
by dannoura (Pilgrim) on Jul 03, 2003 at 09:01 UTC |