Perlmodul Net::DNS

[Ralph Meyer]

Hallo Liste,

ich hab für den Einsatz von SpamAssassin das Modul
Net::DNS - 0.49 unter Perl 5.6.1 installiert.

Nun wollte ich mal ein Beispiel von der CPAN - Seite
des Moduls ausprobieren aber das funktioniert nicht.

Folgendes Beispiel .

<Anfang>
#!/usr/bin/perl


use Net::DNS;
  my $res   = Net::DNS::Resolver->new;
  my $query = $res->search("www.kernel.org");

  if ($query) {
      foreach my $rr ($query->answer) {
          next unless $rr->type eq "A";
          print $rr->address, "\n";
      }
  } else {
      warn "query failed: ", $res->errorstring, "\n";
  }

</ENDE>

Beim Ausführen kommt dann die Fehlermeldung :

Can't locate object method "answer" via package "query" (perhaps you forgot to load "query"?) at
./netdns.pl line 9.

Kann mir einer sagen wo der Fehler ist ? Irgendwelche Abhängigkeiten
zu anderen Modulen ?
Bei SpamAssassin schlagen diese Tests auch fehl. Ich hätte aber
gern das die funktionieren.

Danke

Ralph
-- 
E-Mail          : ralph at schosemail.de

Web             : http://www.ralph-meyer.de