Telnet is een programma voor toegang tot tekst -consoles op servers . U kunt een Perl- script dat automatisch verbinding met een Telnet- server zonder gebruikersbeoordelingen - ingang zodat deze opdrachten automatisch kan uitvoeren creëren. Helaas kun je niet de Telnet-opdracht direct bellen vanuit een Perl-script omdat het accepteert alleen opdrachten van de console . Perl officiële CPAN module archief bevat de Net :: Telnet module, die de Telnet-protocol implementeert en stelt u in staat om Telnet functies toe te voegen aan uw Perl script . Instructies
1 Klik op " Start", " Alle programma's , " " Accessoires" en kopen van 2 Installeer Net :: Telnet door het intikken van " perl " Opdrachtprompt . " - MCPAN - e ' install Net :: Telnet ' " bij de opdrachtprompt en druk op ' Enter '.
Open Kladblok of uw favoriete code-editor 3 .
4 Kopieer en plak de volgende tekst in de teksteditor : gebruik
Net :: Telnet ; $ telnet
= new Net :: Telnet ( Timeout = > 10 ,
Errmode = > ' sterven '
Prompt = > ' /\\ $ $ /i ' ) ; $ telnet - > geopend ( ' telnet.website.com '
)
$ telnet - > login ( ' gebruikersnaam ' , ' wachtwoord' ) ; afdruk
$ telnet - > cmd ( 'wie' ) ;
5 < ; p > Vervang " telnet.website.com " met de website of het IP -adres van de Telnet-server , " username" met de gebruikersnaam van de Telnet-server vereist en " password " met het wachtwoord van de gebruikersnaam op de Telnet- server .
< br > Type andere Perl -opdrachten 6 u wilt dat de Telnet- script uit te voeren na het verbinding met de Telnet- server .
7 Sla het Perl- script door te klikken op " File " en " Save ", typen van een naam voor het script en druk op ' Enter '.
|
