Perl, Cpan Install Google Page Rank

install:
cpan
install WWW::Google::PageRank
install LWP::UserAgent
install URI::Escape
gpr2.pl file content:
#!/usr/bin/perl
use WWW::Google::PageRank;
my $domain = $ARGV[0];
my $pr = WWW::Google::PageRank->new;
print "PR: ", scalar($pr->get("http://$domain")), "\n";
usage:
./gpr2.pl domain_name