Horst: (Info) WWW::Google::PageRank

Beitrag lesen

Hallo,

einfacher gehts nicht:

  
#!/usr/bin/perl  
  
my $url = 'http:://example.com';  
  
use WWW::Google::PageRank;  
  
my $gpr = WWW::Google::PageRank->new();  
my $pr = $gpr->get($url);  
print qq(  
   Pagerank für $url: $pr  
);  

Das Modul kann auch ohne Admin-Berechtigung 'installiert' werden:
Im Verzeichnis /cgi-bin/
die Unterverzeichnisse /WWW/Google anlegen, das Modul nach
/cgi-bin/WWW/Google/PageRank.pm kopieren.

Im CGI ggf.
use lib '/path/to/libdir';
notieren.

Oder:
Im Modul die Zeile
package WWW::Google::PageRank;
ändern auf
package PageRank;

PageRank.pm ins cgi-bin
use PageRank;
my $gpr = PageRank->new(); # Objekterstellung

Viel Spass damit,
Hotte