VPF::Подстановка времени - Форум программистов

klif

Дата 3.3.2004, 15:16 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

Зарание извиняюсь за глупый вопрос. Но ответ на него не могу почему-то найти

я создаю файл :

>file

а как мне сделать так , чтобы в имене файла присутсвовала дата ?
в таком виде
file_ddmmyy

зарание спасибо

ElectricalStorm

Дата 3.3.2004, 17:07 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник Клуба
Сообщений: 547
Регистрация: 22.1.2004

Репутация: 1
Всего: 9

my ($d,$m,$y) = (localtime)[3,4,5]
open F, ">$d.$m.$y";
типа такого
пишу по памяти не могу проверить .....

--------------------

Нужно знать инструмент, которым пользуешься

klif

Дата 3.3.2004, 17:40 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

Как-то не заработало...
может можно как-то еще ?

GoodBoy

Дата 3.3.2004, 19:27 (ссылка)

(нет голосов)

Загрузка ...

Главный джедай

Профиль
Группа: Модератор
Сообщений: 3886
Регистрация: 8.1.2003
Где: КМВ

Репутация: нет
Всего: 83

все прекрасно заработало...
создался файл с именем "3.2.104", где: 3 - день месяца, 2 - месяц года (они нумеруются с 0) и 104 - год (отсчет идет с 1900)
Если хотите имя типа File_030304 то можно так:

Код

my ($d,$m,$y) = (localtime)[3,4,5];
$m++;
$y-=100;
$d = "0".$d if $d<10;
$m = "0".$m if $m<10;
$y = "0".$y if $y<10;
open F, ">File_$d$m$y";

--------------------

Чем дальше в лес, тем толще партизаны...

Цитата(igorold @ 1.5.2016, 17:40

)

Индейцы не обратили внимания на поток беженцев из Европы… Теперь они живут в резервациях.

Klif

Дата 4.3.2004, 11:10 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

Значит у меня что-то не так!
Подробные пояснения к этой строке можете дать ?

my ($d,$m,$y) = (localtime)[3,4,5];

А то у меня ошибочку на нее выдает!
Да и я в ней чего-то не догоняю

GoodBoy

Дата 4.3.2004, 11:24 (ссылка)

(нет голосов)

Загрузка ...

Главный джедай

Профиль
Группа: Модератор
Сообщений: 3886
Регистрация: 8.1.2003
Где: КМВ

Репутация: нет
Всего: 83

А что пишется в сообщении об ошибке?? У меня все работает!
попробуй еще так:

Код

my ($d,$m,$y) = (localtime(time))[3,4,5];

Эта строка возвращает 4, 5 и 6 элементы массива, полученного вызовом функции localtime, а именно текущие день месяца (нумерация начинается с 1), месяц (0- январь... 11-декабрь) и год (отсчет ведется с 1900).
Полный вызов выглядит так:

Код

($Second, $Minute, $Hour, $DayOfMonth, $Month, $Year,
  $Weekday, $DayOfYear, $IsDST) = localtime(time);

возвращает:

Код

(секунды, минуты, часы, день_месяца, номер_месяца, номер_года,
  нень_недели, день_года, признак_летнего_времени) = localtime(time)

--------------------

Чем дальше в лес, тем толще партизаны...

Цитата(igorold @ 1.5.2016, 17:40

)

Индейцы не обратили внимания на поток беженцев из Европы… Теперь они живут в резервациях.

Klif

Дата 4.3.2004, 13:00 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

Все! Заработало ... сам дурак был...
Спасибо большое за помощь!

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: Системное программирование \| Следующая тема »