Link to home
Start Free TrialLog in
Avatar of HilltownHealthCenter
HilltownHealthCenter

asked on

Got the session, but can't get through the login.

Manual telnet would produce:

User Access Verification

Password:_


When I use the code below, I only get:

User Access Verification

(Can't get to the password prompt.)
#!perl
use warnings;
use strict;
use Net::Telnet;
 
my $Response;
 
my $telnet = Net::Telnet->new();
$telnet->open("172.20.1.254")
  or die "Could not open connection\n";
 
while ($Response = $telnet->getline){
        print $Response;
}

Open in new window

Avatar of HilltownHealthCenter
HilltownHealthCenter

ASKER

More: after several seconds, this line appeared:

read timed-out at C:\test_ping.pl line 13

C:\>
ASKER CERTIFIED SOLUTION
Avatar of Adam314
Adam314

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Got it to work. Fantastic!