форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка

Вариант для распечатки		Пред. тема | След. тема
Форумы Программирование под UNIX (Public)
Изначальное сообщение		[Проследить за развитием треда]

"Как получить дату последнего изменения файла"

Сообщение от XPurple (ok) on 26-Дек-05, 09:15

Как в перле получить дату последнего изменения/модификации файла ?

Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

Сообщения по теме

[Сортировка по времени, UBB]

1. "Как получить дату последнего изменения файла"

Сообщение от allez (ok) on 26-Дек-05, 10:03

>Как в перле получить дату последнего изменения/модификации файла ? Читайте perldoc perlfunc на предмет stat() и perldoc File::stat.

Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

	2. "Как получить дату последнего изменения файла"
	Сообщение от XPurple (ok) on 26-Дек-05, 11:11
	>Читайте perldoc perlfunc на предмет stat() и perldoc File::stat. Я так понял, что потом это значение mtime надо подсунуть localtime($st_mtime). Я прав ?
	Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

	3. "Как получить дату последнего изменения файла"
	Сообщение от allez (ok) on 26-Дек-05, 14:38
	>>Читайте perldoc perlfunc на предмет stat() и perldoc File::stat. >Я так понял, что потом это значение mtime надо подсунуть localtime($st_mtime). Я >прав ? Правильной дорогой идете, товарищ. :-) Если быть более точным, то попробуйте делать так, как написано в "perldoc Time::localtime": > use Time::localtime; >        use File::stat; >        $date_string = ctime(stat($file)->mtime);
	Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

	4. "Как получить дату последнего изменения файла"
	Сообщение от redd on 06-Апр-06, 13:21
	можь поможет это скрипт удаляет файлы если они созданы более какогото времени #!/usr/bin/perl -w use File::stat; @files=glob("*.lock"); foreach $file (@files) { $st=stat($file); $time=time(); if ($st->mtime-$time<-1800) { # system("rm -f $file"); print $file," ",$st->mtime,"  ",$time,"\n"; } }
	Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

Архив | Удалить	Индекс форумов | Темы | Пред. тема | След. тема
Оцените тред (1=ужас, 5=супер)? [ 1 | 2 | 3 | 4 | 5 ] [Рекомендовать для помещения в FAQ]