Hi everyone,
 
I need some assistance with a Net::Telnet project.  I am trying to telnet from my Win2k box to a Solaris 2.8 host to run an application.  I can telnet as root into the Solaris box via the command console, but when I try to do it through my Perl code, I get an invalid username or password (I have not included the password in the below code...).  I can telnet as another user, but I need to be root to run this application. 
 
Besides not using Strict and running with the -w flag, can anyone see anything obvious with the below code?  Thanks in advance for your help!
 
Erich C. Beyrent
CKP Newspaper Systems, Inc.
===================================================
 
#!/usr/bin/perl
 
use Net::Telnet;
 
$obj = new Net::Telnet (Input_log => "input.log",
                        Output_log => "output.log",
                        Dump_log =>"dmp.log",
                        Timeout => 10,
                        Prompt => "/\#/"
                       );
                      
$obj->open("192.168.100.78");
$obj->login(Name=>'root', Password=>$password );
$ok = $obj->cmd(String => "pwd", Timeout => 10);
exit;
 
 
 

Reply via email to