Собрать статистику
Добавлено: 2010-12-08 12:45:52
Добрый день всем, я тут хочу собрать статистику чтоб потом ее в кактус отдавать, накидал такой вот скрипт, но пока что то не получается забрать стату
пишет после старта
что может не так быть, т.к. ручками тоже делаю, все нормально, цепляется.
Код: Выделить всё
#!/usr/bin/perl
use Net::SSH::Perl;
$host="xx.xx.xx.xx";
$params{"protocol"}="2";
$params{"cipher"}="3des-cbc";
$params{"port"}=22;
$cmd="ifconfig | grep ng | wc -l";
$var = Net::SSH::Perl->new($host, %params);
$var->login($login,$password);
($out, $err, $exit) = $var->cmd($cmd);
$var->close();пишет после старта
Код: Выделить всё
./stat1.pl
Permission denied at ./stat1.pl line 11