Запуск команды оболочки из Perl и разрешение взаимодействия - PullRequest
1 голос
/ 19 января 2012

Мне нужно иметь возможность запускать команду командной строки из моего сценария perl, и я хочу, чтобы пользователь мог взаимодействовать с ней как обычно.

Например, скрипт, который я хочу запустить, это ssh $user@$box '. ./.profile 1>/dev/null 2>&1 && AnotherScript.pl'
Я хочу, чтобы пользователь мог взаимодействовать и видеть команду ssh так же, как если бы он / она выполнял ее самостоятельно. Мне все равно, что происходит во время команды, я просто хочу, чтобы выполнение вернулось моему сценарию perl, когда он будет завершен.

1 Ответ

3 голосов
/ 19 января 2012
system 'ssh', "$user\@$box", '. ./.profile 1>/dev/null 2>&1 && AnotherScript.pl';

Подробнее о встроенной функции system см. http://perldoc.perl.org/functions/system.html.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...