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