Dator
 |  Startsida |  Hårdvara |  Nätverk |  Programmering |  Programvara |  Felsökning |  System |   
Programmering
  • C /C + + -programmering
  • Computer Programspråk
  • Delphi Programmering
  • Java Programming
  • JavaScript programmering
  • PHP /MySQL Programmering
  • perl Programmering
  • python Programming
  • Ruby programmering
  • Visual Basics Programmering
  • * Dator Kunskap >> Programmering >> perl Programmering >> Content

    Hur man skapar en enkel Telnet skript i Perl

    Skriv ett Perl ( Practical Extraction and Report Language ) skript för att upprätta en telnet -anslutning till en fjärrserver när du har repetitiva kommandoradsverktyg administrativa uppgifter ( t.ex. analysera loggfiler ) som måste utföras regelbundet. Du kan utnyttja Perl moduler ligger i internationellt speglade CPAN ( Comprehensive Perl Archive Network ) plats i stället för att skriva alla nödvändiga metoder från scratch . Använd Net :: Telnet modul för att skapa ett kort manus och upprätta en telnet -anslutning . Saker du behöver
    Windows-dator med Perl programmeringsspråk programvara ( t.ex. ActivePerl ) installerat
    Net : Telnet Perl -modul installerad
    Visa fler instruktioner
    1

    Klicka "Start " -knappen i aktivitetsfältet i Windows och klicka på sök . Skriv " cmd " i sökrutan . Tryck på " Enter" . Skriv " notepad " utan citationstecken på kommandoraden och tryck på " Enter"
    2

    Skriv följande i Anteckningar textredigerare program som visas : .

    # /Usr ! /bin /perl

    använda Net :: Telnet , $ TLNT = ny Net :: Telnet ( Timeout = > 10 , Errmode = > ' dö ' ) ; $ TLNT - > open ( ' telnet_server_IP ' ) ; $ TLNT - > WAITFOR ( ' /login : $ /i ' ) ; $ TLNT - > print ( ' användarnamn ' ) ; $ TLNT - > WAITFOR ( ' /lösenord : $ /i ' ) ; $ TLNT - > print ( ' account_password ' ) ; $ TLNT - > WAITFOR ( ' /\\ $ $ /i ' ) ; $ TLNT - > print ( "vem" ) , $ output = $ TLNT - > WAITFOR ( ' /\\ $ $ /i '); print $ produktion;

    Byt användarnamn med namnet på ett konto som har telnet tillgång till telnet -server , byt account_password med lösenordet för det konto som har telnet tillgång , och byt telnet_server_IP med IP-adressen för Telnet-servern .

    Observera att Net :: Telnet modulen kallas i början av telnet manus och de metoder som används i skriptet ingår i modulen .

    3

    Klicka på menyn Arkiv och välj Spara som i menyn som visas . Skriv " telnettest.pl " ( inklusive citattecken ) i rutan Filnamn . Klicka på rutan Filformat och välj Alla filer . Klicka på knappen "Spara" .
    4

    Type " telnettest.pl " på kommandoraden och tryck på " Enter" . Ett meddelande visas som bekräftar att Perl-skript har etablerat en telnet anslutning med Telnet-servern .

    Tidigare:

    nästa:
    relaterade artiklar
    ·Konvertera platta filer till XML
    ·Hur du kontrollerar om ett giltigt datum i Perl
    ·Hur man gör en katalog i Perl Med Script
    ·Perl Script File Tutorial
    ·Hur man skapar variabler i Perl
    ·Hur konvertera binära data till en decimal i Perl
    ·Hur man tar bort en vagnretur från en sträng i Perl
    ·Perl & Square Funktioner Root
    ·Perl stränglängden Funktion
    ·Söka efter en fil i Perl
    Utvalda artiklarna
    ·Hur man använder en Skeva Heap i Java
    ·Hur bindande data till en metod i WPF
    ·Hur Ange GridView Datakey i Code
    ·Hur man använder MATLAB för att lösa ett linjärprog…
    ·Hur man läser Flat File flera gånger i COBOL
    ·Kan Android Run Jar
    ·Hur får man ett attribut i JavaScript
    ·Hur nära en MQ -anslutning från Java
    ·Hur man skapar en schemaläggare i Visual Basic
    ·Vad är Python i Windows
    Copyright © Dator Kunskap http://www.dator.xyz