Krawatte :: netaddr :: ip

implementiert einen Hash, an dem der Schlüssel ein Subnetz ist
Jetzt downloaden

Krawatte :: netaddr :: ip Ranking & Zusammenfassung

Anzeige

  • Rating:
  • Lizenz:
  • Perl Artistic License
  • Preis:
  • FREE
  • Name des Herausgebers:
  • Luis Mu
  • Website des Verlags:
  • http://search.cpan.org/~luismunoz/

Krawatte :: netaddr :: ip Stichworte


Krawatte :: netaddr :: ip Beschreibung

Implementiert einen Hash, an dem der Schlüssel ein Subnetz ist Krawatte :: netaddr :: IP ist ein Perl-Modul, das Hashes überlastet, sodass der Schlüssel ein Subnetz wie in NetAddr :: IP sein kann. Bei der Suche von Werten wird eine Interpretation gemacht, um die angegebene Taste in den im Hash angegebenen Subnetzen festzuhalten. Das auf der Synopsis bereitgestellte Codebeispiele würde die Positionen jeder Maschine in der FOREACH-Schleife ausdrucken. Care muss als nur genommen werden Saiten, die als IP-Adresse von NetAddr :: IP analysiert werden können, können als Schlüssel für diese Hash.Isteratoren auf dem Hash verwendet werden, z. Bei der Suche nach einem Wert wie in $ Hash {$ ipaddress} wird diese IP-Adresse unter den Subnetzen aufgenommen, die als Schlüssel innerhalb des HASH vorhanden sind. Das übereinstimmende Subnetz mit der längsten Maske (dh das spezifischste Subnetz) wird gewinnen und der zugehörige Wert wird zurückgegeben. Dieser Code kann nach den in der Perl-Lizenz angegebenen Bedingungen frei verteilt werden, vorausgesetzt, dass der richtige Guthaben aufrechterhalten wird. Bitte senden Sie Fehlerberichte und Feedback an den Autor für weitere Verbesserungen. Synopsis verwenden Krawatte :: netaddr :: ip; meine%; Krawatte% Wois, Tie :: netaddr :: IP; $ Worinis {"10.0.10.0/24" = "Labor, Erster Stock"; $ Worinis {"10.0.20.0/24"} = "Rechenzentrum, Zweiter Stock"; $ Worin {"10.0.30.0/27" = "Remote-Standort"; $ Worinis {"0.0.0.0/0"} = "Gott weiß, wo"; FORECH $ host ("10.0.10.1", "10.0.20.15", "10.0.32.17", "10.0.32.17", "10.10.0.1") {Print "Host $ host ist in", $ worabis {$ host}, "\ n"; } FOREACH $ Subnetz (Keys% woris) {drucken "Netzwerk", $ Subnetz, "wird in", $ worin {$ subnet}, "\ n" verwendet, verwendet. } ot% woris; Anforderungen: · Perl. Was ist neu in dieser Version: · Allgemeine Aktualisierung. Patch von Kazuyuki Maejima, um den Fehler mit den Tasten zu beheben, als nächstes, jedes usw.


Krawatte :: netaddr :: ip Zugehörige Software

Über uns