Come scrivere uno script Perl Telnet che spinge per il nome dell'host

Telnet è un programma utilizzato per accedere ai server . Perl è un linguaggio di programmazione che può essere utilizzato per accedere all'interfaccia Telnet tramite un pacchetto chiamato " Net :: Telnet ", che è disponibile per il download gratuito . Il pacchetto Net :: Telnet consente ai programmatori di comunicare con un server in Perl usando protocolli Telnet . C'è un metodo all'interno del pacchetto per il nome dell'host . Così, il nome host può essere stampato da Perl mentre Perl ha accesso a un server Telnet . Istruzioni
1

Avviare il prompt dei comandi di Windows . Fare clic su "Start ", "Esegui". Digitare " cmd.exe" e premere " Invio".
2

eseguire la shell CPAN . Al prompt dei comandi digitare : " perl- MCPAN -e shell " e premere " Invio".
3

Installare Net :: Telnet . Al prompt dei comandi , digitare " install Net :: Telnet :: Cisco " e premere " Invio".
4

Avviare un editor di codice o Notepad .
5

Usa il seguente codice per avviare una connessione Telnet e richiedere per l'host :
uso

Net :: Telnet ;

$ telnet = new Net :: Telnet ( Timeout = > 10 , Errmode = > , 'die '); $ telnet - > open (' < Server_Name ');

$ telnet - > waitfor ( ' /login : $ /i ');

$ telnet - > print (' ');

$ telnet - > waitfor ( ' /password : $ /i ');

$ telnet - > print ( ' < login_password ');

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

$ telnet - > print ( 'host' ) ; < br

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

$ output ;
6

Salvare il file . Utilizzare l' estensione PL .

• Come convertire XLS in CSV su Perl 
• Come convertire script in Perl per EXE