Re^2: Checking Google PageRank

in reply to Re: Checking Google PageRank
in thread Checking Google PageRank

Method get returns an empty string.

use strict;
use Data::Dumper;

use WWW::Google::PageRank;
my $pr = WWW::Google::PageRank->new;
print Dumper($pr);
print scalar($pr->get('http://www.yahoo.com/')), "\n";
[download]

Comment on Re^2: Checking Google PageRank Download Code

Replies are listed 'Best First'.
Re^3: Checking Google PageRank by biohisham (Priest) on Oct 11, 2011 at 19:52 UTC
Well, what appears is that an HTTP request gets executed and is actually successful but no content is returned that we can decode via HTTP::Response::decoded_content or HTTP::Response::content, it is very hard for me to find out but the behavior seems universal regardless of the website I am querying, so maybe Google has stopped entertaining automated access via code for security probably, just a guess .. `use strict; use warnings; use HTTP::Response; use HTTP::Status; use Data::Dumper; use WWW::Google::PageRank; my $pr = WWW::Google::PageRank->new; my @context = $pr->get("http://www.perlmonks.org"); print $context[1]->status_line, "<<<<\n"; #The request is carried out! print $context[1]->content,"\n"; #No result is returned print $context[1]->decoded_content,"\n"; #No result either` [download] David R. Gergen said "We know that second terms have historically been marred by hubris and by scandal." and I am a two y.o. monk today :D, June,12th, 2011...	[reply] [d/l] [select]
Re^4: Checking Google PageRank by anneli (Pilgrim) on Oct 11, 2011 at 20:56 UTC
This is most likely. Google's PageRank endpoints are very trigger-happy with the banhammer, and will begin demanding CAPTCHAs (which I'm sure WWW::Google::PageRank will not like) very quickly.	[reply]

In Section Seekers of Perl Wisdom