Zitat:
| Zitat von uwevoelker #!/usr/bin/perl -w
use strict;
use WWW::Google::PageRank;
my $url = $ARGV[0];
unless ($url) {
print "Usage $0 URL\n";
exit 1;
}
my $pr = WWW::Google::PageRank->new;
print "$url: ".$pr->get($ARGV[0])."\n"; |
mit diesem script kann ich aber nur eine url testen!
ich muss die urls irgendwie in einer .txt datei speichern können und das script soll sie dann der reihe nach testen!