Bewertung Perl ( Practical Extraction und Report Language) Skript, um eine Telnet-Verbindung zu einem Remote-Server herzustellen, wenn Sie sich wiederholende Command-Line Administration Aufgaben (z. B. Parsen Log-Dateien) , die durchgeführt werden müssen regelmäßig . Sie nutzen können, Perl-Module in der international gespiegelt CPAN ( Comprehensive Perl Archive Network) -Website eher als das Schreiben alle erforderlichen Methoden von Grund entfernt. Verwenden Sie die Net :: Telnet -Modul ein kurzes Skript zu schaffen und eine Telnet-Verbindung . Things You
Windows-Computer mit Programmiersprache Perl -Software (wie ActivePerl ) brauchen installiert
Net : Telnet Perl-Modul installiert
anzeigen Weitere Anweisungen
1
Klicken die Schaltfläche "Start" auf der Windows-Taskleiste und klicken Sie auf Suchen . Geben Sie "cmd" in das Suchfeld ein. Drücken Sie die " Enter"-Taste . Geben Sie "Notepad " ohne Anführungszeichen in der Befehlszeile und tippen Sie auf die Taste "Enter"
2
Geben Sie den folgenden in den Texteditor Notepad Programm, das erscheint .
# /Usr ! /bin /perl
Verwendung Net :: Telnet ; $ TLNT = new Net :: Telnet ( Timeout = > 10 , Errmode => ' sterben '); $ TLNT -> open (' telnet_server_IP ' ); $ TLNT -> waitfor ( ' /login : $ /i '); $ TLNT -> print (' Benutzername '); $ TLNT -> waitfor ( ' /password: $ /i '); $ TLNT -> print (' account_password '); $ TLNT -> waitfor ('/\\ $ $ /i '); $ TLNT -> print ( "wer" ); $ output = $ TLNT -> waitfor ( ' /\\ $ $ /i '); print $ ausgegeben ;
ersetzen Benutzername mit dem Namen eines Kontos, das Telnet-Zugriff auf den Telnet-Server hat , account_password ersetzen mit dem Passwort für das Konto, Telnet-Zugang hat , und ersetzen telnet_server_IP mit der IP-Adresse des Telnet-Server .
Beachten Sie, dass die Net :: Telnet -Modul wird zu Beginn des Telnet- Skript aufgerufen und die Methoden im Skript verwendet werden im Modul enthalten.
3
Klicken Sie auf das Menü Datei und wählen Sie Speichern unter in dem Menü, das erscheint. Geben Sie " telnettest.pl " (einschließlich der Anführungszeichen) in das Feld Dateiname ein. Klicken Sie auf das Feld Dateityp , und wählen Sie Alle Dateien. Klicken Sie auf die Schaltfläche "Speichern" .
4
Type " telnettest.pl " in der Befehlszeile ein und drücken Sie die "Enter "-Taste. Es erscheint eine Meldung bestätigt, dass das Perl-Skript hat eine Telnet-Verbindung mit dem Telnet- Server hergestellt .