Автор Тема: Информация о файле  (Прочитано 6225 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн xmolex

  • Завсегдатай
  • Пользователь
  • **
  • Сообщений: 75
  • +0/-0
  • 0
    • Просмотр профиля
    • http://
Информация о файле
« : 10 Апреля 2006, 10:53:12 »
Здравствуйте уважаемые. Поискал по интернету. Ничего полезного не нашел. Может вы подскажете. Вопрос такой: каким способом можно узнать имя владельца и группу? Как я понял, благодаря stat можно узнать только uid,gid. А нужны имена. Заранее благодарен.

Оффлайн djkostya

  • Завсегдатай
  • Пользователь
  • **
  • Сообщений: 53
  • +0/-0
  • 0
    • Просмотр профиля
    • http://www.jobs.su/
Информация о файле
« Ответ #1 : 10 Апреля 2006, 11:22:11 »
А если так
ls -l

Оффлайн djkostya

  • Завсегдатай
  • Пользователь
  • **
  • Сообщений: 53
  • +0/-0
  • 0
    • Просмотр профиля
    • http://www.jobs.su/
Информация о файле
« Ответ #2 : 10 Апреля 2006, 11:23:34 »
Ну то есть в хэшик записать результат

Оффлайн xmolex

  • Завсегдатай
  • Пользователь
  • **
  • Сообщений: 75
  • +0/-0
  • 0
    • Просмотр профиля
    • http://
Информация о файле
« Ответ #3 : 10 Апреля 2006, 11:32:28 »
Конечно можно. Но хочется сделать многоплатформенный скрипт.

Оффлайн arto

  • Ветеран
  • *****
  • Сообщений: 699
  • +0/-0
  • 2
    • Просмотр профиля
Информация о файле
« Ответ #4 : 10 Апреля 2006, 11:58:04 »
perldoc -f getpwent

Оффлайн xmolex

  • Завсегдатай
  • Пользователь
  • **
  • Сообщений: 75
  • +0/-0
  • 0
    • Просмотр профиля
    • http://
Информация о файле
« Ответ #5 : 10 Апреля 2006, 12:10:46 »
Спасибо. Вижу, что копать нужно в этом направлении. Только не заработало. Может намекнешь в чем дело.

#!/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);

Оффлайн AnnA

  • Фанатка форума
  • Старожил
  • ****
  • Сообщений: 263
  • +0/-0
  • 2
    • Просмотр профиля
    • http://
Информация о файле
« Ответ #6 : 10 Апреля 2006, 13:13:45 »
Цитировать
xmolex:
узнать имя владельца и группу?

Цитировать
xmolex:
хочется сделать многоплатформенный скрипт.

тут у вас нестыковочка получается. ;)
пока-пока. :)

Оффлайн xmolex

  • Завсегдатай
  • Пользователь
  • **
  • Сообщений: 75
  • +0/-0
  • 0
    • Просмотр профиля
    • http://
Информация о файле
« Ответ #7 : 10 Апреля 2006, 13:19:19 »
А разве в маки не в счет?

Оффлайн xmolex

  • Завсегдатай
  • Пользователь
  • **
  • Сообщений: 75
  • +0/-0
  • 0
    • Просмотр профиля
    • http://
Информация о файле
« Ответ #8 : 10 Апреля 2006, 13:19:27 »
А разве маки не в счет? Извиняюсь за лишнее сообщение. Случайно получилось.

Оффлайн xmolex

  • Завсегдатай
  • Пользователь
  • **
  • Сообщений: 75
  • +0/-0
  • 0
    • Просмотр профиля
    • http://
Информация о файле
« Ответ #9 : 10 Апреля 2006, 13:43:29 »
Цитировать
arto:
perldoc -f getpwent


А нет универсального способа? Я так понял, что такой метод будет работать только в никсах или там где есть /etc/passwd. Может есть какой-нибудь универсальный модуль? Не хочется загромождать программу. Она и так уже очень немаленькая.

И еще вопрос. Допустим у меня в переменной находится число. Как его преобразовать в восьмеричное и записать в эту же переменную, чтобы потом, когда нужно вывести? printf печатает сразу, а нужно просто записать результат в переменную.
« Последнее редактирование: 10 Апреля 2006, 14:12:51 от xmolex »

Оффлайн arto

  • Ветеран
  • *****
  • Сообщений: 699
  • +0/-0
  • 2
    • Просмотр профиля

Оффлайн xmolex

  • Завсегдатай
  • Пользователь
  • **
  • Сообщений: 75
  • +0/-0
  • 0
    • Просмотр профиля
    • http://
Информация о файле
« Ответ #11 : 10 Апреля 2006, 14:25:05 »
Блин. Многовато кода будет пожалуй. Легче просто под никсы написать, на другие ОС забить. А что по второму вопросу?

Оффлайн arto

  • Ветеран
  • *****
  • Сообщений: 699
  • +0/-0
  • 2
    • Просмотр профиля
Информация о файле
« Ответ #12 : 10 Апреля 2006, 15:04:17 »
perldoc -f sprintf

Оффлайн xmolex

  • Завсегдатай
  • Пользователь
  • **
  • Сообщений: 75
  • +0/-0
  • 0
    • Просмотр профиля
    • http://
Информация о файле
« Ответ #13 : 10 Апреля 2006, 15:12:45 »
Цитировать
arto:
perldoc -f sprintf

Спасибо. Даже стыдно стало. До самого не дошло.

 

Sitemap 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28