Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re^6: Net::Telnet timed out when logging in

by regexes (Hermit)
on Apr 18, 2008 at 09:07 UTC ( [id://681426]=note: print w/replies, xml ) Need Help??


in reply to Re^5: Net::Telnet timed out when logging in
in thread Net::Telnet timed out when logging in

Try just the "<"... that's the last thing on the prompt line. If that doesn't solve the issue then you will need to analyze the dump_log files and see where it's timing out.
use Net::Telnet; my $telnet3; $telnet3 = new Net::Telnet(timeout => 10, Errmode => 'die' Prompt => '/</'); $telnet3->open('10.200.16.58'); $telnet3->login('IATEST', 'TESTBED'); @lines = $telnet3->cmd("who");
regexes

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others surveying the Monastery: (7)
As of 2024-04-19 15:56 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found