|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Dmitry Smolin 2:5020/949 28 Sep 2002 05:34:54 To : Sergey Naumov Subject : Права_доступа --------------------------------------------------------------------------------
Once, 27 Sep 2002 11:13, Sergey Naumov wrote to All:
SN> Кто-нибудь знает как получить права доступа файлового объекта только с
SN> использованием perl'a (не прибегая к вызову внешних программ).
$mode = (stat( $filename ))[2];
printf "Permissions are %04o\n", $mode & 07777;
А заодно и: perldoc -f stat
Take care.
--- skanking to the rhythm of the music by my side
* Origin: Sing me a line from your favourite song (2:5020/949)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/208523d950825.html, оценка из 5, голосов 10
|