Модуль Perl cpan для выполнения нескольких команд
Net::ssh::expect
позволяет нам входить в удаленный маршрутизатор и запускать команды.
Есть ли способ запустить эти команды в одну строку.
Я имею в виду, есть ли способ выполнить три команды, перечисленные ниже, с одной переменной $cmd
Вместо того, чтобы использовать $cmd1, $cmd2, $cmd3
для ls настройте и выйдите соответственно.
my $cmd1 = $ssh->exec("ls");
my $cmd2 = $ssh->exec("configure");
my $cmd3 = $ssh->exec("exit");
Для удаленного входа мы делаем следующее:
my $ssh = Net::SSH::Expect->new (host => "ip addr",
password=> 'pwd',
user => 'username',
raw_pty => 1);
Точно так же есть способ выполнять команды?