Forum Webscript.Ru
Программирование => Perl => Тема начата: xmolex от 10 Апреля 2006, 10:53:12
-
Здравствуйте уважаемые. Поискал по интернету. Ничего полезного не нашел. Может вы подскажете. Вопрос такой: каким способом можно узнать имя владельца и группу? Как я понял, благодаря stat можно узнать только uid,gid. А нужны имена. Заранее благодарен.
-
А если так
ls -l
-
Ну то есть в хэшик записать результат
-
Конечно можно. Но хочется сделать многоплатформенный скрипт.
-
perldoc -f getpwent
-
Спасибо. Вижу, что копать нужно в этом направлении. Только не заработало. Может намекнешь в чем дело.
#!/usr/bin/perl -w
print "Content-type: text/html\\n\\n";
use File::stat;
use User::pwent;
$filename = "design.jpg";
$is_his = (stat($filename)->uid == pwent($whoever)->uid);
print"$is_his";
Говорит ошибка в $is_his = (stat($filename)->uid == pwent($whoever)->uid);
-
xmolex:
узнать имя владельца и группу?
xmolex:
хочется сделать многоплатформенный скрипт.
тут у вас нестыковочка получается. ;)
-
А разве в маки не в счет?
-
А разве маки не в счет? Извиняюсь за лишнее сообщение. Случайно получилось.
-
arto:
perldoc -f getpwent
А нет универсального способа? Я так понял, что такой метод будет работать только в никсах или там где есть /etc/passwd. Может есть какой-нибудь универсальный модуль? Не хочется загромождать программу. Она и так уже очень немаленькая.
И еще вопрос. Допустим у меня в переменной находится число. Как его преобразовать в восьмеричное и записать в эту же переменную, чтобы потом, когда нужно вывести? printf печатает сразу, а нужно просто записать результат в переменную.
-
http://www.unix.org.ua/orelly/perl/sysadmin/ch03_02.htm
-
Блин. Многовато кода будет пожалуй. Легче просто под никсы написать, на другие ОС забить. А что по второму вопросу?
-
perldoc -f sprintf
-
arto:
perldoc -f sprintf
Спасибо. Даже стыдно стало. До самого не дошло.