VPF::Из скрипта в Perl не работает rsh - Форум программистов

vladguard

Дата 19.11.2009, 14:21 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 2
Регистрация: 19.11.2009

Репутация: нет
Всего: нет

Есть скрипт на перл:

Код


#!/usr/bin/perl -w
$cmd1='print $1 "\t" $2 "\t" $3 "\t" $4 "\t" $5';
$cmd2='print $3 "\t" $6';
$rsh='/usr/bin/rsh';
@sh_user=`$rsh -l kaluga $host show user | grep Vi | awk '{$cmd1}'`;
@sh_pppoe=`/usr/bin/rsh -l kaluga $host show pppoe session | grep Vi | awk '{$cmd2}'`;
for ($i=0; $i<scalar(@sh_user); ++$i) 
{
  ($vi[$i], $user[$i], $typ_sees[$i], $time[$i], $ip_sees[$i]) = split(/\t/,$sh_user[$i],5);
  chop $ip_sees[$i];
  chop $ip_sees[$i];
   }
for ($i=0; $i<scalar(@sh_pppoe); ++$i) 
{
  ($mac, $sess) = split(/\t/,$sh_pppoe[$i],2);
  chop $sess;
 $mac=uc(substr($mac,0,2).":".substr($mac,2,2).":".substr($mac,5,2).":".substr($mac,7,2).":".substr($mac,10,2).":".substr($mac,12,2));
  for ($j=0; $j<scalar(@vi); ++$j) 
    {
        if ($sess eq $vi[$j]) {
        $macadr[$j]=$mac;
                    }
    }
}
for ($i=0; $i<scalar(@vi); ++$i) 
{
...............

при запуске из консоли все работает а при запуске по cron нехочет.
Причем не работает сторка с rsh данные не приходят.

В чем может быть проблема?

arto

Дата 19.11.2009, 16:32 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1495
Регистрация: 31.10.2004

Репутация: 1
Всего: 40

переменные окружения?

Добавлено через 1 минуту и 5 секунд
и, конечно, man rsh

Bulat

Дата 19.11.2009, 17:09 (ссылка)

(нет голосов)

Загрузка ...

татарский Нео

Профиль
Группа: Завсегдатай
Сообщений: 1701
Регистрация: 22.3.2006
Где: Альметьевск

Репутация: нет
Всего: 57

Цитата(vladguard @ 19.11.2009, 14:21

)

при запуске из консоли все работает а при запуске по cron нехочет.

а при запуске не по крону?? просто при ручном запуске как ведет себя скрипт??

--------------------

менеджер по кодеврайтингу smile

amg

Дата 19.11.2009, 17:17 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1145
Регистрация: 3.8.2006
Где: Новосибирск

Репутация: 9
Всего: 50

Цитата(vladguard @ 19.11.2009, 14:21

)

В чем может быть проблема?

Я тоже думаю, что дело в переменных окружения. У крона очень немного переменных окружения, например, обычно переменной PATH нет. Поэтому все внешние программы (grep, awk, ...) - с полными путями. Хуже не будет, лучше - может быть.

arto

Дата 19.11.2009, 17:31 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1495
Регистрация: 31.10.2004

Репутация: 1
Всего: 40

в кроне PATH есть, но обычно она урезанная. но для стандартных програм хватает.

vladguard

Дата 11.12.2009, 16:37 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 2
Регистрация: 19.11.2009

Репутация: нет
Всего: нет

полные пути прописал... тоже самое, проблема в ответах cisco.......

arto

Дата 11.12.2009, 16:45 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1495
Регистрация: 31.10.2004

Репутация: 1
Всего: 40

может проблема в контрольном терминале?

okanatov

Дата 15.2.2010, 19:30 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 15.2.2010

Репутация: нет
Всего: нет

Попробуй в свой home добавить файл со следующим содержимым:

%> cat .rhosts
+
%>

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: Системное программирование \| Следующая тема »