WWW::Google::PageRank

WWW::Google::PageRank #

こんなスクリプトを保存しておいて

 #!/usr/bin/perl
 use strict;
 use warnings;
 
 use WWW::Google::PageRank;
 
 my $g = WWW::Google::PageRank->new;
 my $p = $g->get(shift);
 print $p,"\n";

実行すると

 [name@host]$ pagerank http://haro.jp/
 4

とかなって、ひまつぶし 参考になる

See Also

Copyright © 髭。/ Hugo + hugo-book