Googleのページランクを取得するスクリプト。或は人類のハッキング気質について

　何気に検索していたら、Googleのページランクを取得するというモジュールが多数存在するようです。
ソースを見ていたら、所定のページから値を取得してきて、特定の数字で割ってランクを出しているようです。
所謂マジックナンバーを割り出しているのです。まぁどうやって出したんでしょうね？
インプットとアウトプットは用意出来るので、遺伝的アルゴリズム？うーん。世の中賢い人が一杯いますね。

下記のソースは、perlでその成果を享受するものです。
使うだけだと簡単ですね。

#!/usr/bin/perl

use WWW::Google::PageRank;

my $url = shift @ARGV;
my $pr = WWW::Google::PageRank->new;

my $val = scalar($pr->get($url));
#print $url . "\n";
print $val . "\n";

exit;