Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

Re^2: net::ssh::perl : no way to send cmd !

by coldroom (Novice)
on Feb 01, 2010 at 15:18 UTC ( #820764=note: print w/replies, xml ) Need Help??

in reply to Re: net::ssh::perl : no way to send cmd !
in thread net::ssh::perl : no way to send cmd !


Thanks for your answer, but I already tryed with expect.. look at this :

SSHAuthenticationError Login timed out. The input stream currently has the contents bellow: RW@'s password:  at /usr/local/share/perl/5.10.1/ line 828

When I use this :

print ("login : @switch_details[4] \n"); print ("password : @switch_details[3]\n"); my $ssh = Net::SSH::Expect->new ( host => @switch_details[1], password=> @switch_details[3], user => @switch_details[4], raw_pty => 1 ); my $login_output = $ssh->login();

My login & password are good..

If I try to use net::ssh::perl, there is a bug, and now, with expect, bug too.. I don't know how doing that :(

Replies are listed 'Best First'.
Re^3: net::ssh::perl : no way to send cmd !
by salva (Abbot) on Feb 01, 2010 at 15:54 UTC
    what happens when you try to run the same command from the command line?
    $ ssh -vvv user@your.switch upload cfg_toTFTP ...
      Hello, I finally found a way :)
      sub Recup_dlink_DGS { my $ssh = Net::SSH::Expect->new ( host => @switch_details[1], user => @switch_details[4], password => @switch_details[3], raw_pty => 1, timeout => 5); eval { my $login_output = $ssh->login(); if ($login_output !~ /Welcome/) { die "=> Echec l'identification \n=> $login_output"; } } $ssh->exec("upload cfg_toTFTP $serveur_tftp @switch_details[2]"); &controle_cfg; return 1; }
      Thanks, I would not find it without your help. Many thanks ;)

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://820764]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (2)
As of 2017-12-17 08:45 GMT
Find Nodes?
    Voting Booth?
    What programming language do you hate the most?

    Results (462 votes). Check out past polls.