|
ru.unix.bsd
- RU.UNIX.BSD ------------------------------------------------------------------
From : Michael Stepanov 2:5020/400 07 Nov 2006 16:28:23
To : Alexey Gankov
Subject : Re: perl vs cron
--------------------------------------------------------------------------------
"Alexey Gankov" <Alexey.Gankov@p207.f2450.n5020.z2.fidonet.org>
сообщил/сообщила в
новостях следующее: news:1162898801@p207.f2450.n5020.z2.ftn...
> Hello All!
> Простите начинающего за дурацкий (видимо) вопрос, но столкнулся с тем, что не
> могу разобраться в следующем.
> Есть тупой перловый скрипт (приложен ниже). В ручном режиме все на ура
> работает. Запускаю через крон (от рута ессно) все отрабатывает, но выходной
> файл в заданом месте ($file_path) не создается.
> Ткните в чем засада....
> #!/usr/bin/perl
> use strict;
> use locale;
>
> my @rules=("10000", "10010", "10020", "10030");
>
> my $filename = sprintf("%02d.trf", (localtime)[3]);
> my $folder= sprintf("/www/docs/traffic/%02d_%d", 1+(localtime)[4],
> 1900+(localtime)[5]);
> if( -d $folder) { print "folder exist\n";}
> else { print "will make folder\n"; mkdir($folder);}
> my $file_path= sprintf("%s/%02d.trf",$folder, (localtime)[3]);
> print "filename- $file_path\n";
> for(my $i=0; $i<$#rules+1; $i++)
> {
> print `ipfw show @rules[$i] >>'$file_path'`;
> print "rules # @rules[$i]\n";
> }
Пути пропиши явно для команд типа ipfw
--- ifmail v.2.15dev5.3
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: perl vs cron 
