Wie ein Perlskript Telnet die Eingabeaufforderungen für die Host-Namen schreiben

Telnet ist ein Programm zum Server zugreifen. Perl ist eine Programmiersprache, die dazu dient, rufen Sie die Telnet-Oberfläche über ein Paket namens "Telnet", die zum kostenlosen Download zur Verfügung steht. Das Telnet-Paket ermöglicht Programmierern, die Kommunikation mit einem Server in Perl mit Telnet-Protokollen. Es gibt eine Methode innerhalb des Pakets für den Host-Namen. Somit kann der Host-Name von Perl gedruckt werden, während Perl Zugriff auf einem Telnet-Server hat.

Anweisungen

1 Starten Sie die Windows-Eingabeaufforderung. Klicken Sie auf "Start" "Ausführen". Typ "cmd ein. "EXE" drücken dann "Enter."

2 Führen Sie die CPAN-Shell. Geben Sie bei der Eingabeaufforderung: "Perl - MCPAN -e-Shell" drücken Sie "Enter."

3 Telnet zu installieren. Geben Sie an der Eingabeaufforderung "Net::Telnet::Cisco installieren" und drücken Sie "Enter."

4 Starten Sie ein Code-Editor oder Notepad.

5 Verwenden Sie den folgenden Code, um eine Telnet-Verbindung und die Eingabeaufforderung für den Host zu starten:

Verwenden Sie Telnet;

$telnet = neue Telnet (Timeout = > 10, Errmode = > 'Die'); $telnet -> öffnen ('< Servername ');

$telnet -> Waitfor ('/ Anmeldung: $/ i');

$telnet -> Druck ("< Login_Name >');

$telnet -> Waitfor ("/ Passwort: $/ i');

$telnet -> Druck ("< Login_Password');

$telnet -> Waitfor ('/ \ $ $/ i');

$telnet -> print('host');

$output = $telnet -> Waitfor ('/ \ $ $/ i');

Drucken Sie $output;

6 Speichern Sie die Datei. Verwenden Sie die Erweiterung PL