Telnet is een programma dat wordt gebruikt om toegang te krijgen tot servers. Perl is een programmeertaal die kan worden gebruikt om toegang te krijgen tot de Telnet- interface via een pakket genaamd " Net :: Telnet , " die gratis te downloaden is . De Net :: Telnet- pakket stelt programmeurs in staat om te communiceren met een server in Perl met behulp van Telnet protocollen . Er is een methode in het pakket voor de naam van de host . Aldus kan de naam van de host worden afgedrukt terwijl Perl Perl heeft toegang tot een Telnet server . Instructies
1 Start de Windows Command Prompt . Klik op ' Start ', ' Uitvoeren. ' Type " CMD.EXE " en druk op " Enter ". Kopen van 2 Voer de CPAN shell . Bij de opdrachtprompt typen : " perl - MCPAN - e shell " en druk op " Enter ".
3 Installeer Net :: Telnet . Bij de opdrachtprompt , typ " installeren Net :: Telnet :: Cisco " en druk op " Enter ".
4 Lanceer een code-editor of Notepad .
5 gebruik de volgende code om een Telnet- verbinding te starten en vraagt voor de gastheer : gebruik
Net :: Telnet ; $ telnet
= new Net :: Telnet ( Timeout = > 10 , Errmode = > , ' sterven ' ) ; $ telnet - > geopend ( ' < Server_Name ' ) ;
$ telnet - > waitfor ( ' /login : $ /i ' ) ;
$ telnet - > afdruk ( ' ' ) ;
$ telnet - > waitfor ( ' /password : $ /i ' ) ;
$ telnet - > afdruk ( ' < login_password ' ) ;
$ telnet - > waitfor ( ' /\\ $ $ /i ' ) ;
$ telnet - > afdruk ( ' host' ) ; < br $ vermogen > = $ telnet - > waitfor ( ' /\\ $ $ /i ' ) ; afdruk $ uitgang
;
6 Sla het bestand op . Gebruik de extensie PL .
|
