Forum Webscript.Ru

Программирование => Perl => Тема начата: Andr от 09 Июля 2001, 13:47:50

Название: nbtstat
Отправлено: Andr от 09 Июля 2001, 13:47:50

Hi All!
Подскажите, пожалуйста, как получить из Perl\'a информацию о
компьютере, аналогичную той, которую выдает NTшная
nbtstat -A ipaddr.
Желательно из-под Unix\'a.

Название: nbtstat
Отправлено: Light Elf от 09 Июля 2001, 17:08:24

Я не знаю, что выдает эта команда, но посмотри это.

foreach my $i (keys %ENV){
   print $i,\'-\',$ENV{$i}, "
"; # or

}

Название: nbtstat
Отправлено: Andr от 09 Июля 2001, 18:04:27

К сожалению, это не то, что надо.
Приведенная в вопросе команда выдает список NetBIOS имен
компа по его айпишнику с их типом и статусом.
Работает вроде как с 139 портом.
А вот как бы такой запрос на Perle организовать?

Название: nbtstat
Отправлено: Glader от 14 Августа 2001, 08:26:14

А если
open(NBT, "nbtstat -A $curr_ip |");
?