|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : HЁЄ®« © Ђ«пЎл襢 2:5020/400 28 Nov 2002 09:37:27
To : All
Subject : Perl script не выполняется по cron
--------------------------------------------------------------------------------
Привет.
Введение
Есть файлик /tmp/generate.pl
-rwxr-xr-x 1 root wheel 121 4 ноя 10:19 generate.pl
Содержимое:
#!/usr/bin/perl
$dir = "/var/log/radius/radacct/wtmp";
opendir (DIR,$dir) or (print "Cannot open $dir: $!\n");
@files=grep {!(/^\./) && -f "$dir/$_"} readdir(DIR);
closedir (DIR);
foreach $user (@files) {
chomp($user);
system ("/usr/local/radacct/radstat $user >/tmp/data/$user");
}
Все пути в файлике проверены/перепроверены.
Если запускать файл просто из телнета/ssh, то он выполняется и результат
сохраняется в /tmp/data. Всё работает правильно (как и хочется).
Если в crontab прописать строку:
*/1 * * * * root /tmp/generate.pl
То в папке /tmp/data сохраняются файлики $user нулевой длины. Hе работает.
Что делается не так.. поиски решения ни к чему не привели.
В скрипте также использовались конструкции open (FILE,...), $var='...';
ничего из них не работает.
Если еще нужна какая-нибудь доп.информация пишите.
Hиколай Алябышев E-mail: nick@mari-el.net
--- ifmail v.2.15dev5
* Origin: JSC Martelcom (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
