UpdateChecker::Web -- to check WebPage whether updated or not.
# create UpdateChecker object $wuc = new UpdateChecker::Web({date => 'File'});
# set timout 10 sec. $wuc->timeout(10);
# set default filter $wuc->default_filter('rss')
# set rss option $wuc->rss(1);
Have you been tired to check your favorite web pages which you don't know whether they have updated from previous check or not? With this module, you can know updated part and percentage of difference from previous check without going there.
This module need below modules:
LWP::UserAgent HTML::TokeParser::Simple HTML::RSSAutodiscovery XML::RSS
$wuc = new UpdateChecker::Web({data => 'File'}, %option);
It creates UpdateChecker::Web object.
%option is for example;
disable_filter => 0 not use filter html2text => 1 ... use filter html2text rss => 1 ... use filter rss
my $timeout = $wuc->timeout($sec); my $timeout = $wuc->timeout;
my $f = $wuc->default_filter($filter); my $f = $wuc->default_filter;
$filter is filter name. See filter section.
UpdateChecker::Web->rss(1); $wuc->rss(1); $wuc->rss('http://example.jp/index.rss');
It takes one argument, 1 or undef, or rss location. If its argument is 1, it seek rss file from target contents. When it detects target's rss file, it sets rss location as its target's. When it cannnot detect, it understands target has no rss file.
If its argument is rss file location, it parses rss file. When it doesn't exist or doesn't parse, It understands target has no rss file.
HTML to TEXT.
HTML to TEXT except link.
Kato Atsushi <ktat.is at gmail.com>
Copyright 2003 by Kato Atsushi <ktat.is at gmail.com>.
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