Home: Need a Custom or Prewritten Perl Program?: I need a program that...:
Need help on Net:Telnet

New User

Dec 16, 2008, 6:44 AM

Views: 3216
Need help on Net:Telnet

I am doing telnet from perl with port 1291.
login prompt is like as follows:

Some TEXT.
Please logon...

User: aaccccoouunntt

Password: p*a*s*s*w*o*r*d*

my code is as follows:


$hostname = "localhost";
$username = "account";
$passwd = "password";

## Connect and login.
use Net::Telnet ();
$host = new Net::Telnet (Port => 1291, Timeout => 30);
$host->login($username, $passwd);


# sleep 10;

I am getting the following error:

timed-out waiting for login prompt at telnet.pl line 11

Please help