Hacked around a bug in XML::RSS

This commit is contained in:
Dave Morriss
2023-01-10 20:22:47 +00:00
parent 4f744f37c4
commit d549c7bed0
7 changed files with 309 additions and 4 deletions

View File

@@ -44,6 +44,9 @@ use utf8;
use feature qw{ postderef say signatures state };
no warnings qw{ experimental::postderef experimental::signatures } ;
use FindBin::libs;
use XML::RSS;
use Getopt::Long;
use Pod::Usage;
use Config::General;
@@ -57,7 +60,7 @@ use Net::DNS;
use IO::Socket;
use LWP::UserAgent;
use WWW::RobotRules;
use XML::RSS::Parser;
#use XML::RSS::Parser;
use XML::Feed;
use XML::FeedPP; # Fall back?
use Feed::Find;
@@ -815,7 +818,7 @@ sub loadUrls {
emit( $silent,
"Type $uridata{TYPE} contained "
. scalar(@found_urls)
. " feeds; to be investigated\n" );
. " feeds; queued to be checked for inclusion\n" );
}
else {
emit( $silent,