Subject: | tests breaking, Google search returns anomalous results |
under perl 5.6.0, default that comes with RH7.2 (2.4.7-10 kernel)
Scraper-2.00 fails on test 7, dies.
after a force install, WWW::Search::Scraper('Google') returns anomalous results - all subsequent searches after the first one in a script return the url for the initial search, though with the correct title and description information - short script after error log paste.
it would be great if you could help! i guess screen-scraping is a high-load activity.
PERL_DL_NONLAZY=1 /usr/bin/perl -Iblib/arch -Iblib/lib -I/usr/lib/perl5/5.6.0/i386-linux -I/usr/lib/perl5/5.6.0 test.pl
1..37
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
query string is empty at test.pl line 86
make: *** [test_dynamic] Error 255
script showing anomalous results -
#!/usr/bin/perl
use strict;
use WWW::Search::Scraper;
foreach my $q (5 .. 10) {
my $search = new WWW::Search::Scraper('Google');
$search->native_query(WWW::Search::escape_query($q));
my $r = $search->next_result;
print "$q: " . $r->title . " " . $r->url . "\n";
}