nicht angemeldet
(Info) WWW::Google::PageRank
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
-
WWW::Google::PageRank;
Und für Interessierte der Link:
http://search.cpan.org/~ykar/WWW-Google-PageRank-0.14/Siechfred
--
Hinter den Kulissen passiert viel mehr, als man denkt, aber meistens nicht das, was man denkt.-
WWW::Google::PageRank;
Und für Interessierte der Link:
http://search.cpan.org/~ykar/WWW-Google-PageRank-0.14/Danke Siechfred,
für die Verlinkung. Btw., ich bin von dem Modul in zweierlei Hinsicht begeistert,
erstens vereinfacht es das Konstrukt eines UserAgents ganz erheblich, tut also als Wrapper für einen bestimmten Anwendungsfall,
zweitens ist es ein gutes Beispiel für Perl'er, die anfangen, selbst Module zu schreiben.
Und überhaupt ist der PR bei goooooooooogle nicht uninteressant ;-)
Daher mein Post vorhin.
Viele Grüße,
Horst Haselhuhn
-