Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Re: command is timing-out when execute the script

by protist (Monk)
on Sep 03, 2012 at 12:39 UTC ( #991423=note: print w/ replies, xml ) Need Help??


in reply to command is timing-out when execute the script

I figured I could help most by reformatting your post.

I am using NET::TELNET module to configure a router. I am facing the f +ollowing issue. My Script : =========== #!/usr/bin/perl use strict; use warnings; use Net::Telnet; #Connecting the DUT: my $t = Net::Telnet->new ( Timeout => 3, input_l +og => "D:/Profiles/admin/Desktop/input.log", ); $t->open("192.168.210.2"); $t->waitfor('/\W login:gi/'); $t->print("admin"); $t->waitfor('/Password:/'); $t->print("cisco"); $t->waitfor('/\W\>/'); $t->print("enable"); $t->waitfor('/\W\#/'); $t->print("configure terminal"); $t->waitfor('/Enter configuration commands, one per line. End with CN +TL\/Z./'); $t->waitfor('/\W\(config)#/'); #$t->print("show version"); #STEP 1 : Intersting Traffic configuration: @lines = $t->cmd("ip acce +ss-list 0.100"); $t->waitfor('/\W\(config)#/'); @lines = $t->cmd ("permit ip 192.168.1.0/24 192.168.101.0/24 log rule +-precedence 111"); $t->waitfor('/\W\(config)#/'); $t->print ("commit write memory"); $t->waitfor('/\W\(config)#/'); $t->print ("show context"); PROBLEM: ======= When I execute this script, script is "timing-out at + line 61". That is "@lines = $t->cmd("ip access-list 0.100"); " Its executing only first command. Please help me to resolve this iss +ue. Thanks in advance.


Comment on Re: command is timing-out when execute the script
Download Code
Re^2: command is timing-out when execute the script
by marto (Bishop) on Sep 03, 2012 at 12:51 UTC

    Code tags are for code and data, everything else does not need to be within code tags. See Markup in the Monastery. The post is already flagged to add code tags where appropriate.

      was just making it legible...ran it through sed

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://991423]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (8)
As of 2014-12-21 03:31 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (102 votes), past polls