Telnet er et program som brukes til å få tilgang til servere. Perl er et programmeringsspråk som kan brukes til å få tilgang til Telnet -grensesnittet via en pakke kalt "Netto :: Telnet ", som er tilgjengelig for gratis nedlasting. The Net :: Telnet pakken lar programmerere å kommunisere med en server i Perl bruker Telnet protokoller . Det finnes en metode inne i emballasjen for vertens navn . Dermed kan vertens navn skal skrives ut av Perl mens Perl har tilgang til en Telnet server. Instruksjoner
en

Start Windows Command Prompt. Klikk " Start", " Kjør". Type " CMD.EXE " trykk " Enter".
2

Kjør CPAN skallet. Ved ledeteksten skriver du: " perl - MCPAN - e shell " og trykk "Enter".
3

Installer Net :: Telnet. Ved ledeteksten skriver du " installere Net :: Telnet :: Cisco " trykk " Enter".
4

Start en kode editor eller Notisblokk .
5

Bruk følgende kode for å starte en Telnet -tilkobling og be for verten : en

bruk Net :: Telnet ;

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

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

$ telnet - > print (' ');

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

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

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

$ telnet - > print (' host ');

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

print $ utgang,
6

Lagre filen . Bruk extension PL .