Архив форумов ЦИТФорума

[Serg_swamp]

Как на Perl посмотреть какие компьютеры есть в сети и их шары?
Сеть Microsoft. OS WinXP

[Dmitry.Karpov http://www.]

Запускаешь из Perl 'net view ...' под Wыndows или 'nmblookup ...' из состава Samba под Unix - и вперед...

[Serg_swamp]

Огромное спасибо.
Действительно всё гениальное просто .

P.S. Я уже начал копать в сторону Win API.

[Dmitry.Karpov http://www.]

Именно Unix с его переназначениями ввода-вывода и приучил меня мыслить таким образом. Сравним средства Unix-Shell с DOS/Windows:
> - записать stdout в файл
>> - дописать stdout в конец файла
2>, 2>> - переназначить stderr
2>&1 - переназначить stderr в stdout
< - взять stdin из файла
<< - взять stdin из потока ввода, в т.ч. из командного файла после запуска указанной программы
| - отправить stdout первой программы на stdin второй
`` - подставить stdout второй программы в командную строку первой
(;; объединить stdout и stderr нескольких программ
и это далеко не полняй список возможностей, с помощью которых происходит скриптовое программирование. Короче, учи Unix - и будет тебе счастье!

[Serg_swamp]

Да Unix я немного знаю (во всяком случае многое из того что ты написал мне известно), но дело именно в том что сервак работает под Win и перенастраивать его пол Unix мне никто не даст .

[Dmitry.Karpov http://www.]

Дело не в том, под чем работает сервак, а в принципах мышления - у юниXоидов, у м$явников и у акорновцев они очень различаются.

А вообще-то надо рядом поставить еще один сервак под Unix и постепенно переносить функции на него.