Hi,
You have to look at umask probably. I'm not a perl guy, so I do not know how to do it from perl, but user's umask defines initial file permissions on the new files.
Thanks
--- Sas
>Вопрос таков.
>Пишу скриптик (только начинаю разбираться с Perl-ом), с помощью которого вытаскиваю из
>/etc/passwd данные всех пльзователей зарегестрированных в системе. Потом беру список необходимых
>мне пользователей, которым необходимо создать домашнюю директорию и символические ссылки в
>их директории (естественно с разными правами доступа) из отдельного файлика. Ссылочки
>также находятся в отдельном файле. Затем с помощью модуля File::stat вывожу
>пермишин каждого пользователя, юзера находятся в отдельном файле (Если пользователю предоставлены
>права 750, то их ему и надо присвоить). Так вот, если
>кто знает, подскажите как перехватить уже предоставленные права (на саму директорию
>и всё что в ней создаётся заново) и назначить их. Клиентские
>машины обновляются каждые две недели путём клонирования и создавать ссылки и
>присваивать каждому пользователю свои права немного напряжно. Сервак на FreeBSD.
>Заранее спасибо.