ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Konstantin Boyandin                  2:5020/175.2   06 Feb 2003  05:25:22
 To : Maxim
 Subject : - установка правдоступа при открытии файла..
 -------------------------------------------------------------------------------- 
 

     Приветствую, Maxim!
 
  M> ..я написал разборщик технологической почты .. 
  M> при получении письма на определенный почтовый ящик sendmail форвардит его
  M> на входной поток моего скрипта (perl).. проблема состоит в том, что при
  M> создании файла лога при такой схеме ему автоматически присваиваются права
  M> -rw-r--r--.. тем самым у меня отсутствует доступ на редактирование этого
  M> лога .. т.к. он создается с владельцем mail который фактически есть root..
  M> я вхожу в группу mail, .. но разрешения на редактирование для группы в
  M> правах нет(
 
  M> вот ..
  M> я пытался создать файл путем:
  M> sysopen(FH,$path,O_APPEND|O_RDWR|O_CREAT,0666)
  M> моя umask=0002
 
  M> и у меня никак не получается установить требуемые мне атрибуты доступа к
  M> файлу.. всеравно
 
     open(FILEHANDLE, ">>$filename");
     ...blah blah blah...
     close(FILEHANDLE)
     if ($newfilecreated) {
         chmod($newmask, $filename);
     }
 
     подобная последовательность работает в моём, схожем, случае (один из
 скриптов, запускаемых procmail'ом).
 
     Всего наилучшего,
 
 Константин
 
 http://shamteran.ru
 
 --- ifmail v.2.15dev5
  * Origin: FidoNet Online - http://www.fido-online.com (2:5020/175.2)
 
 

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