/ 
Net-Google-1.0
River stage one • 2 direct dependents • 2 total dependents
/ Net::Google::Cache

NAME

Net::Google::Cache - simple OOP-ish interface to the Google SOAP API for cached documents

SYNOPSIS

use Net::Google::Cache;
my $cache = Net::Google::Cache(\%args);

$cache->url("http://aaronland.net);
print $cache->get();

DESCRIPTION

Provides a simple OOP-ish interface to the Google SOAP API for cached documents.

This package is used by Net::Google.

PACKAGE METHODS

__PACKAGE__->new(\%args)

Valid arguments are :

  • key

    string. A Google API key.

    If none is provided then the key passed to the parent Net::Google object will be used.

  • url

    string.

  • http_proxy

    url.

    Get/set the URL for proxy-ing HTTP request.

    Returns a string.

  • debug

    Valid options are:

    • boolean

      If true prints debugging information returned by SOAP::Lite to STDERR

    • coderef.

      Your own subroutine for munging the debugging information returned by SOAP::Lite.

The object constructor in Net::Google 0.53, and earlier, expected a GoogleSearchService object as its first argument followed by a hash reference of argument. Versions 0.6 and higher are backwards compatible.

Returns an object. Woot!

OBJECT METHODS

$obj->key($string)

Get/set the Google API key for this object.

$obj->http_proxy($url)

Get/set the HTTP proxy for this object.

Returns a string.

$pkg->url($url)

Set the cached URL to fetch from the Google servers.

Returns a string. Returns an undef if there was an error.

$pkg->get()

Fetch the requested URL from the Google servers.

Returns a string. Returns undef if there was an error.

$obj->queries_exhausted()

Returns true or false depending on whether or not the current in-memory session has exhausted the Google API 1000 query limit.

VERSION

1.0

DATE

$Date: 2005/03/26 20:49:03 $

AUTHOR

Aaron Straup Cope

TO DO

  • Add hooks to get method to strip out Google headers and footers from cached pages.

SEE ALSO

Net::Google

LICENSE

Copyright (c) 2002-2005, Aaron Straup Cope. All Rights Reserved.

This is free software, you may use it and distribute it under the same terms as Perl itself.