|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Slava Korchagin 2:5025/57 20 Jul 2000 11:02:35 To : Andrey N. Demushkin Subject : date --------------------------------------------------------------------------------
Wednesday, July 19 2000 22:45, Andrey N. Demushkin wrote to All:
AD> Есть некий файл с именем file.ext
AD> Как мне его пеpеименовать в файл вида DD.MM.YEAR, то есть, поиметь его
AD> в виде сегодняшней даты, типа 19.07.2000
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$wintertime)=localtime(time);
rename 'file.ext', sprintf("%02u.%02u.%04u", $mday, $mon+1, $year+1900);
Good bye. Slava
--- CoolDead 3.0.1
* Origin: = Thaboo Station = (Voronezh, Russia) (2:5025/57)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/18663976dc66.html, оценка из 5, голосов 10
|