Telnet er et program, der bruges til at få adgang servere. Perl er et programmeringssprog, der kan bruges til at få adgang til Telnet grænseflade via en pakke kaldet "Net :: Telnet ", som er tilgængelig til gratis download. The Net :: Telnet pakke tillader programmører at kommunikere med en server i Perl hjælp Telnet protokoller. Der er en metode inden pakken for værtens navn . Således kan værtens navn trykkes af Perl mens Perl har adgang til en Telnet server. Instruktioner
1
Start Windows Kommandoprompt. Klik på " Start", " Run". Type " CMD.EXE " tryk derefter på "Enter".
2
Kør CPAN shell. Ved kommandoprompten typen : " perl - MCPAN - e shell" og tryk derefter på "Enter".
3
Installer Net :: Telnet. På kommandoprompten skal du skrive "install Net :: Telnet :: Cisco " og derefter trykke på " Enter".
4
Start en kode editor eller Notesblok.
5
Brug følgende kode til at starte en Telnet-forbindelse , og bede om værten : Hej
brug 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
Gem filen . Brug forlængelsen PL .