Hello , please help to figure out why ssh commands returns only commands themselves as output.
$ssh = Net::SSH::Expect->new (
host => "$connectIP",
password=> 'pass',
user => 'Admin',
port => '22',
raw_pty => 1,
timeout => 10
);
$ssh->run_ssh() or die "SSH process couldn't start: $!";
$ssh->waitfor('password: ');
$ssh->send("pass");
$ssh->waitfor('\>.* ');
$ssh->send("server security authentication=local,radius");
$ssh->waitfor('\>.* ');
$ssh->send("y");
$ssh->waitfor('\>.* ');
my $line;
while ( defined ($line = $ssh->read_all()) ) {
print $line . "\n";
}
I tried also login -> exec construction , also does not work for me. Please point me what I am doing wrong .
Thank you
Dmitry