Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Дата следующего гогда с вычетом 1 дня, Например: 01.03.2006 - 28.02.2007 
:(
    Опции темы
ежик
  Дата 13.2.2006, 01:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 115
Регистрация: 19.9.2005
Где: Южно-Сахалинск

Репутация: нет
Всего: 1
как узнать дату следующего гогда с вычетом 1 дня, от сегодняшнего.
Напимер:
Сегодня: 10.02.2006
а какое будет в 2007: 09.02.2007
а вот такой фокус
01.03.2006 - 28.02.2007


--------------------
Прежде чем задать вопрос прочитай инфу!!!
PM MAIL ICQ   Вверх
tishaishii
Дата 15.2.2006, 02:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Создатель
***


Профиль
Группа: Завсегдатай
Сообщений: 1262
Регистрация: 14.2.2006
Где: Москва

Репутация: нет
Всего: 8
Есть модуль Date::Manip.
А первый вопрос решается гораздо проще:
Код
$segodn'a=time;
$vchera=$segodn'a-60*60*24;
print scalar localtime $vchera;
или короче:
Код
print scalar localtime time - 60 * 60 * 24

Добавлено @ 03:06
Я протестую!
Почему это старый синтаксис Perl обрабатывается не правильно?
Апострофы для обозначения пакетов поддерживаются и версией 5.8.
PM MAIL ICQ Skype   Вверх
korob2001
Дата 15.2.2006, 06:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 13
Всего: 61
Цитата(tishaishii @ 14.2.2006, 23:58 Найти цитируемый пост)
Я протестую!
Почему это старый синтаксис Perl обрабатывается не правильно?
Апострофы для обозначения пакетов поддерживаются и версией 5.8.

smile Навязываем новый стиль.


--------------------
"Время проходит", - привыкли говорить вы по неверному пониманию. 
"Время стоит - проходите вы".
PM MAIL WWW ICQ MSN   Вверх
ежик
Дата 15.2.2006, 08:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 115
Регистрация: 19.9.2005
Где: Южно-Сахалинск

Репутация: нет
Всего: 1
нет она выдает текущий год а надо чтобы следующий
да ладно я решил сделать по другому
просто если 1 число то идет проверка какой текущий месяц
если в текущем месяцие 30 дней то предведущий 31, а если 3 месяц то предведущий 29
--------------------
Прежде чем задать вопрос прочитай инфу!!!
PM MAIL ICQ   Вверх
chaos
Дата 15.2.2006, 09:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Серийный программист
****


Профиль
Группа: Завсегдатай
Сообщений: 2979
Регистрация: 7.7.2004
Где: Екатеринбург

Репутация: нет
Всего: 44
Цитата(ежик @ 15.2.2006, 08:49)
да ладно я решил сделать по другому
просто если 1 число то идет проверка какой текущий месяц
если в текущем месяцие 30 дней то предведущий 31, а если 3 месяц то предведущий 29

такой метод - извращение(надо уважать себя smile ибо такими задачами занимались много много лет назад - щас мы пишем на языках Высокого уровня) тк наду учитывать размер в днях каждого месяца + еще надо учесть высокостность

на мой взгляд smile решение ниже "самое правильное" из всех возможных
Код

#!/usr/bin/perl -w
use strict;

my @curDate = localtime (time - 60*60*24); #Отматываем на день назад
$curDate[5]++; #Прибовляем год 


а потом бы с помощью strftime(POSIX) собрал бы строку

Это сообщение отредактировал(а) chaos - 15.2.2006, 10:55
PM WWW   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl: CGI программирование"
korob2001
sharq
  • В этом разделе обсуждаются вопросы относящиеся только к CGI программированию
  • Если ваш вопрос не относится к системному или CGI программированию, задавайте его в общем разделе
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", качать здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: разработка для Web | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0439 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.