The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

WWW::Google::News::TW - Access to Google's Taiwan News Service (Not Usenet)

SYNOPSIS

  use WWW:Google::News::TW qw(get_news);
  my $results = get_news();

DESCRIPTION

This module provides a couple of methods to scrape results from Google Taiwan News, returning a data structure similar to the following (which happens to be suitable to feeding into XML::RSS).

  {
          '社會' => [
                        {
                          'url' => 'http://udn.com/NEWS/LIFE/LIFS2/2233728.shtml',
                          'headline' => '中�電�線費四樓以下建物�收'
                        },
                      ],
          '焦點' => [
                        {
                          'url' => 'http://www.ettoday.com/2004/09/09/153-1683695.htm',
                          'headline' => '來去嘉義�阿里山�路接�通車走走��別有風味'
                        },
                      ],
   }

METHODS

get_news()

Scrapes http://news.google.com.tw/news?ned=ttw and returns a reference to a hash keyed on News Section, which points to an array of hashes keyed on URL and Headline.

TODO

* Add topic search

AUTHORS

Cheng-Lung Sung <clsung@dragon2.net>

KUDOS

Greg McCarroll <greg@mccarroll.demon.co.uk>, Bowen Dwelle <bowen@dwelle.org> for the basis of this module

COPYRIGHT

Copyright 2004 by Cheng-Lung Sung <clsung@dragon2.net>.

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

See http://www.perl.com/perl/misc/Artistic.html

SEE ALSO

WWW::Google::News, http://news.google.com.tw/

2 POD Errors

The following errors were encountered while parsing the POD:

Around line 77:

Non-ASCII character seen before =encoding in ''社會''. Assuming CP1252

Around line 100:

You forgot a '=back' before '=head1'