Dear Henry :
 
 
            I used Net::Telnet(perl-module) from www.cpan.org use strict ;
   I executed perl-script as follows:
    
            use Net::Telnet ();     
           my $t =  Net::Telnet->new(Timeout => 10,
                                                       Prompt => '/bash\$ $/');          #'/bash\$ $/'--> regular-expression
           $t->open("myhost");
            $t->login("henry", "ab123");
 
   Then I got msg "time out for waiting....."
 
               Cause I dont know much about regular-expression ,
    I modified line2,3 as follows

    my $t =  Net::Telnet->new(Timeout => 10,
                                                );         
 
    That is ,I dont define the second option,
    Then it work normally as a remote shell.
 
 
BestRegards
Henry

Reply via email to