2 # Rss.pl: rss handler hacked from Plug.pl
3 # Author: Tim Riker <Tim@Rikers.org>
4 # Licensing: Artistic License (as perl itself)
13 return join( ' ', @_ ) =~ m/<title>\s*(.*?)\s*<\/title>/gi;
18 my @results = &::getURL($message);
19 my $retval = "i could not get the rss feed.";
21 my @list = &Rss::Titles(@results) if ( scalar @results );
22 $retval = &::formListReply( 0, 'Titles: ', @list ) if ( scalar @list );
24 &::performStrictReply($retval);
29 # vim:ts=4:sw=4:expandtab:tw=80