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