ru.unix.bsd

 
 - RU.UNIX.BSD ------------------------------------------------------------------
 From : Sultan Azhiguzhayev                  2:5083/84.84   30 Oct 2005  17:47:25
 To : All
 Subject : lang/p5-Expect и netstat на удаленном хосте
 -------------------------------------------------------------------------------- 
 

 
 Хочу снимать данные с netstat на удаленном хосте. Пока дополз до такого
 варианта:
 
 #!/usr/bin/perl
 
 use Expect;
 use strict;
 
 my $exp = Expect->spawn("ssh -l User 192.168.0.1 netstat -ibn -f inet");
 my $timeout;
 
 $exp->expect($timeout,
 
         [ 'assword:$' => sub {
                       $exp->send("Pass\n");
                       #exp_continue;
                        }
         ],
         '-re', qr'[#>:] $'
 );
 
 $exp->send("exit\n");
 $exp->soft_close();
 
 Можно ли в этом же скрипте организовать обработку возвращаемых данных?
 
                        Всегда не Ваш, но с наилучшими пожеланиями,
                                                                 Султан.
       -I-
 +]\\\\[+]========================================------
       -I-                     E-Mail: sultan[at]host.kz
 --- GoldED 3.00.Beta2+
  * Origin: 1/3 жизни - сон, 2/3 - желание выспаться... (2:5083/84.84)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор