Telnet è un programma per l'accesso console testuali su server . È possibile creare uno script Perl che si connette automaticamente a un server Telnet senza -input in modo che possa eseguire automaticamente i comandi . Purtroppo , non è possibile chiamare il comando Telnet direttamente dall'interno di uno script Perl , perché accetta solo i comandi da console. Archivio modulo CPAN ufficiale di Perl contiene il modulo Net :: Telnet , che implementa il protocollo Telnet e consente di aggiungere funzioni di Telnet per lo script Perl . Istruzioni
1

Fare clic su "Start ", "Tutti i programmi ", "Accessori" e
2

Installare Net :: Telnet digitando " perl " Prompt dei comandi . " - MCPAN -e ' install Net :: Telnet ' " al prompt dei comandi e premendo " Invio ".
3

Aprire Blocco note o il vostro editor di codice preferito .
4 < p > Copia e incolla il seguente testo in un editor di testo :
uso

Net :: Telnet ;

$ telnet = new Net :: Telnet ( Timeout = > 10 , Stati < p > Errmode = > 'die '

Prompt = > ' /\\ $ $ /i ');

$ telnet - > open (' telnet.website.com ') ;

$ telnet - > login ( 'username' , 'password ');

print $ telnet - > cmd ( 'chi ');
5 < p > Sostituisci " telnet.website.com " con l'indirizzo web o IP del server Telnet , "username" con il nome utente del server Telnet richiede e la "password" con la password del nome utente sul server Telnet .
< br > 6 Tipo di altri comandi

Perl che si desidera lo script Telnet da eseguire dopo che si connette al server Telnet .
7

Salvare lo script Perl facendo clic su "File" e " Salva ", digitare una nome per lo script e premendo " Invio ".