Telnet é um programa usado para servidores de acesso. Perl é uma linguagem de programação que pode ser usado para acessar a interface Telnet através de um pacote chamado " Net :: Telnet ", que está disponível para download gratuito. O pacote Net :: Telnet permite que os programadores para se comunicar com um servidor em Perl usando protocolos Telnet. Existe um método dentro do pacote para o nome do host. Assim , o nome do host pode ser impresso por enquanto Perl Perl tem acesso a um servidor Telnet. Instruções
1

Inicie o Prompt de Comando do Windows. Clique em " Iniciar", " Executar". Digite " CMD.EXE " e pressione "Enter ".
2

Execute o shell CPAN . No prompt de comando digite : " perl- MCPAN -e shell " e pressione "Enter ".
3

Instalar Net :: Telnet. No prompt de comando, digite "install Net :: Telnet :: Cisco " e pressione "Enter ".
4

Inicie um editor de código ou bloco de notas.
5

Use o código a seguir para iniciar uma conexão Telnet e pedir para o anfitrião :

usar 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 $ saída;
6

Salve o arquivo . Use o PL extensão .