![]() |
|
Модераторы: ginnie, korob2001 |
![]()
|
|
| sharq |
|
|||
![]() Perl Liker ![]() ![]() Профиль Группа: Участник Сообщений: 841 Регистрация: 13.12.2004 Где: Ростов-на-Дону Репутация: 3 Всего: 28 |
Возможно ли, с помощью perl реализовать следующее.
С primary сервера (под управлением Linux) подключиться к secondary серверу (Windows 2003 Server), и выполнить команду net start / net stop. И получить результат, т.е. сработал запуск/остановка службы или нет, и отослать результат обратно на primary сервер. Права администратора secondary сервера известны. Если да, то как и какие модули надо использовать. У меня есть вариант - на подобии клиент-сервера, причем сервер на Windows стоит и выполняет команды, но такой вариант не желателен, т.к. необходимо устанавливать ПО на Windows. Заранее спасибо. -------------------- [color=gray]There's More Than One Way To Do It[/color] |
|||
|
||||
| Secandr |
|
|||
|
Связист ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 4043 Регистрация: 3.8.2003 Где: Russia, Volgograd Репутация: нет Всего: 39 |
в обратную делал, а как рулить серввером под win не знаю.
только если открыть веб сервер, там прикрутить перл и по запуску скрипта делать system('net start'); |
|||
|
||||
| Kiber_rat |
|
|||
![]() MACMANIAC ![]() ![]() Профиль Группа: Участник Сообщений: 276 Регистрация: 18.4.2002 Где: Ashdod, Israel Репутация: нет Всего: 9 |
Если у тебя выполнится net stop для той сети по которой ты коннектился то ответа ты уже не получишь
-------------------- Best regards! @..@_____Ku6ep =*=______\______KPbIC
|
|||
|
||||
| Sadok |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 74 Регистрация: 2.11.2004 Репутация: нет Всего: 2 |
А разве net start|stop возвращает какие-то ответы?
|
|||
|
||||
| sharq |
|
|||
![]() Perl Liker ![]() ![]() Профиль Группа: Участник Сообщений: 841 Регистрация: 13.12.2004 Где: Ростов-на-Дону Репутация: 3 Всего: 28 |
Sadok
конечно, любая команда хоть что-нибудь возвращает. спасибо, за помощь -------------------- [color=gray]There's More Than One Way To Do It[/color] |
|||
|
||||
![]()
|
| Правила форума "Perl: Системное программирование" | |
|
|
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Perl: Системное программирование | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |