WWW::Search::Google - class for searching Google
use WWW::Search; my $Search = new WWW::Search('Google'); # cAsE matters my $Query = WWW::Search::escape_query("Where is Jimbo"); $Search->native_query($Query); while (my $Result = $Search->next_result()) { print $Result->url, "\n"; }
This class is a Google specialization of WWW::Search. It handles making and interpreting Google searches. http://www.google.com.
Googles returns 100 Hits per page. Custom Linux Only search capable.
This class exports no public interface; all interaction should be done through WWW::Search objects.
For LINUX lovers like me, you can put Googles in a LINUX only search mode by changing search URL from:
'search_url' => 'http://www.google.com/search',
to:
'search_url' => 'http://www.google.com/linux',
To make new back-ends, see WWW::Search.
native_setup_search is called (from WWW::Search::setup_search) before we do anything. It initializes our private variables (which all begin with underscore) and sets up a URL to the first results page in {_next_url}.
native_setup_search
WWW::Search::setup_search
{_next_url}
native_retrieve_some is called (from WWW::Search::retrieve_some) whenever more hits are needed. It calls WWW::Search::http_request to fetch the page specified by {_next_url}. It then parses this page, appending any search hits it finds to {cache}. If it finds a ``next'' button in the text, it sets {_next_url} to point to the page for the next set of results, otherwise it sets it to undef to indicate we''re done.
native_retrieve_some
WWW::Search::retrieve_some
WWW::Search::http_request
{cache}
This module adheres to the WWW::Search test suite mechanism.
WWW::Search
This backend is maintained and supported by Jim Smyser. <jsmyser@bigfoot.com>
THIS SOFTWARE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
Since this is a new Backend there are undoubtly one. Report any ASAP.
2.02 Last Minute description changes 7/13/99
2.01 New test mechanism 7/13/99
1.00 First release 7/11/99
To install WWW::Search, copy and paste the appropriate command in to your terminal.
cpanm
cpanm WWW::Search
CPAN shell
perl -MCPAN -e shell install WWW::Search
For more information on module installation, please visit the detailed CPAN module installation guide.