Apache::No404Proxy::Google - Implementation of Apache::No404Proxy

Apache-No404Proxy documentation

Contained in the Apache-No404Proxy distribution.

Index

NAME
SYNOPSIS
DESCRIPTION
AUTHOR
SEE ALSO

Code Index:

package Apache::No404Proxy::Google
- fetch
__END__
EOF

NAME

Apache::No404Proxy::Google - Implementation of Apache::No404Proxy

SYNOPSIS

  # in httpd.conf
  PerlTransHandler Apache::No404Proxy::Google
  PerlSetVar GoogleLicenseKey **************

DESCRIPTION

Apache::No404Proxy::Google is one of the implementations of Apache::No404Proxy. This module uses SOAP::Lite to fetch Google cache.

AUTHOR

Tastuhiko Miyagawa <miyagawa@bulknews.net>

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

SEE ALSO

Apache::No404Proxy, SOAP::Lite, WWW::Cache::Google

Apache-No404Proxy documentation

Contained in the Apache-No404Proxy distribution.

package Apache::No404Proxy::Google;

use strict;
use vars qw($VERSION);
$VERSION = 0.05;

require Apache::No404Proxy;
use base qw(Apache::No404Proxy);

use SOAP::Lite;

sub fetch {
    my($class, $r) = @_;
    my $key = $r->dir_config('GoogleLicenseKey') or die "You need GoogleLicenseKey to use this module";
    return SOAP::Lite
	->uri('urn:GoogleSearch')
	    ->proxy('http://api.google.com/search/beta2')
		->doGetCachedPage($key, $r->uri)
		    ->result;
}

1;
__END__