Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options

Re^3: Checking Google PageRank

by biohisham (Priest)
on Oct 11, 2011 at 19:52 UTC ( #930879=note: print w/replies, xml ) Need Help??

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

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(""); 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

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...

Replies are listed 'Best First'.
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.

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://930879]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (None)
    As of 2021-10-21 01:26 GMT
    Find Nodes?
      Voting Booth?
      My first memorable Perl project was:

      Results (82 votes). Check out past polls.