Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris

Re: Unable to get infor from telnet conection

by roboticus (Chancellor)
on Nov 28, 2019 at 16:35 UTC ( #11109376=note: print w/replies, xml ) Need Help??

in reply to Unable to get infor from telnet conection


If it's stuck on the cmd line, I'd expect that the command is waiting for additional input or something similar. Have you read the "Debugging" section of Net::Telnet? It describes a couple functions (input_log() and dump_log()) that you can use to see what's happening so you can figure out the situation. As you've presented it, we don't know what "command" is, what it's doing or why it's hanging.


When your only tool is a hammer, all problems look like your thumb.

  • Comment on Re: Unable to get infor from telnet conection

Replies are listed 'Best First'.
Re^2: Unable to get infor from telnet conection
by iug (Initiate) on Nov 29, 2019 at 07:30 UTC

    Thanks #roboticus for your quick answer.

    #!/usr/bin/env perl use Net::Telnet; print "reporting end of web server log files:\n"; my($input_log, $output_log, $dump_log); $input_log="./input_log.log"; $output_log="./output_log.log"; $dump_log="./dump_log.log"; $hostname = ""; $telobj = new Net::Telnet (-host => $hostname ,-port => 23 ,-dump_log => $dump_log ,-input_log => $input_log ,-output_log => $output_log ,-telnetmode => '' ,-prompt => '/^]/' ); $rad = $telobj -> cmd ("get sn"); pop @rad; chomp @rad; print "\n"; $telobj -> close;

    the command gives back a 6 digit string like 123456. de content of the dump_log is > 0x00000: 67 65 74 20 63 6f 6d 6d 73 0d 0a get comms.. < 0x00000: ff fd 03 ff fe 01 ff fb 01 ... Any idea?

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (5)
As of 2021-02-27 16:33 GMT
Find Nodes?
    Voting Booth?

    No recent polls found