root/WWW-Cache-Google/trunk/lib/WWW/Cache/Google/Imode.pm

Revision 124 (checked in by miyagawa, 19 years ago)

fixed typo in documents

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
Line 
1 package WWW::Cache::Google::Imode;
2
3 use strict;
4 use vars qw($VERSION);
5 $VERSION = '0.01';
6
7 require WWW::Cache::Google;
8 use base qw(WWW::Cache::Google);
9
10 sub cache_base {
11     return 'http://wmlproxy.google.com/chtmltrans/p=i/s=0/u=%s/c=0';
12 }
13
14 sub _cache_param {
15     my $self = shift;
16     my $param = $self->SUPER::_cache_param();
17     $param =~ tr/%/@/;
18     return $param;
19 }
20
21
22 1;
23 __END__
24
25
26 =head1 NAME
27
28 WWW::Cache::Google::Imode - URI class for Google proxy on i-mode
29
30 =head1 SYNOPSIS
31
32   use WWW::Cache::Google::Imode;
33
34   $cache = WWW::Cache::Google::Imode->new('http://www.yahoo.com/');
35
36   $url  = $cache->as_string;    # cache URL
37   $html = $cache->fetch;        # fetches via LWP::Simple
38
39 =head1 DESCRIPTION
40
41 Easy conversion from HTML to CHTML. That's google on i-mode!
42
43 WWW::Cache::Google::Imode provides an easy way conversion from an URL
44 to Google i-mode proxy/cache URL.
45
46 =head1 METHODS
47
48 Same as WWW::Cache::Google.
49
50 =head1 AUTHOR
51
52 Tatsuhiko Miyagawa <miyagawa@bulknews.net>
53
54 This library is free software; you can redistribute it and/or modify
55 it under the same terms as Perl itself.
56
57 It comes WITHOUT WARRANTY OF ANY KIND.
58
59 =head1 SEE ALSO
60
61 L<WWW::Cache::Google>.
62
63 =cut
Note: See TracBrowser for help on using the browser.