Перевод секунд в дату

@ghfwer · Регистрация: 01.12.2015

Author24 — интернет-сервис помощи студентам

написал програмку, которая переводит секунды в дату. и столкнулся с проблемой что если секунды больше или около значения 2147483648 выдается "прошлая" дата.
2087-06-19-23-59-59
2087-06-20-23-59-59
1951-05-16-17-31-43
знатоки, кто может подсказать как оптимизировать эту часть скрипта, чтобы время "шло" дальше(2087-06-21-23-59-59 и т.д.)
вот мой "кусок" программы

Perl

use POSIX();
my $st = $ENV{'AccF'}; #Количество секунд, на которые необходимо увеличивать время.
my @local = (localtime)[0..7];
        $local[0]+=$st; #присваиваем к веремени секунды.
        $date = POSIX::strftime('%Y-%m-%d-%H-%M-%S', @local);
            print "$date\n";

вот здесь у меня затык. когда значение @local больше чем 2147483648 система дает сбой. может ли вообще strftime работать с longint числами? и если да, то каким образом мне объявить переменную local?
стоит perl 5, version 12, subversion 5 (v5.12.5) built for sun4-solaris-64int

думал сделать проверку типа if( $st > 2147483648 ) then.... и дальше не могу придумать, как реализовать.

P.S. просьба сильно не ругать. плюсик в карму за любую помощь. может скрипт другой предложите))

@bidstrup · 03.06.2019, 22:19

https://habr.com/ru/company/regru/blog/254453/

@ghfwer · 04.06.2019, 07:47 **[ТС]**

Большое спасибо за ссылку, все это уже читал, но так и не нашел в ней упоминаний о том, что поддерживается работа с числами больше 32 бит.

@bidstrup · 04.06.2019, 13:05

Сообщение от ghfwer

но так и не нашел в ней упоминаний о том, что поддерживается работа с числами больше 32 бит

А упоминание в документации о том, что арифмит. манипуляции со временем производится прибавлением и вычитанием соответств. полей в функции POSIX::strftime ты находил ?

@ghfwer · 04.06.2019, 13:15 **[ТС]**

можно с этого момента поподробнее, пожалуйста?

@bidstrup · 04.06.2019, 13:27

Кто сказал, что арифметика времени производится простым добавлением в поля функции strftime,
а в указанных в ссылках модулях, которые ты 'все уже читал', какие-то беспокойные ребята занимаются полнейшей ерундой,
разрабатывая данный функционал ?

@ghfwer · 04.06.2019, 13:37 **[ТС]**

так в том-то и проблема ,что простым сложением секунд работает до того момента, пока величина значения не становится слишком "тяжелой"

@bidstrup · 04.06.2019, 17:49

Perl

#!/usr/bin/env perl -w -l
 
use Time::Piece;
use Time::Seconds;
 
 
my $t = localtime;
print "Time is $t\n";
print "Year is ", $t->year, "\n";
 
 
$t += ONE_DAY;      # add 1 day (constant from Time::Seconds)
 
print $t->datetime;     # 2000-02-29T12:34:56 (ISO 8601)
 
$t += 3_000_000_000;
 
print $t->datetime;

@ghfwer · 05.06.2019, 08:19 **[ТС]**

ОГОРОМАДНЕЙШЕЕ СПАСИБО!

@bidstrup 418 / 178 / 27 Регистрация: 11.03.2018 Сообщений: 764
	03.06.2019, 22:19	2
	https://habr.com/ru/company/regru/blog/254453/ 1

@ghfwer 0 / 0 / 1 Регистрация: 01.12.2015 Сообщений: 16
	04.06.2019, 07:47 [ТС]	3
	Большое спасибо за ссылку, все это уже читал, но так и не нашел в ней упоминаний о том, что поддерживается работа с числами больше 32 бит. 0

@bidstrup 418 / 178 / 27 Регистрация: 11.03.2018 Сообщений: 764
	04.06.2019, 13:05	4
	Сообщение от ghfwer но так и не нашел в ней упоминаний о том, что поддерживается работа с числами больше 32 бит А упоминание в документации о том, что арифмит. манипуляции со временем производится прибавлением и вычитанием соответств. полей в функции POSIX::strftime ты находил ? 0

@ghfwer 0 / 0 / 1 Регистрация: 01.12.2015 Сообщений: 16
	04.06.2019, 13:15 [ТС]	5
	можно с этого момента поподробнее, пожалуйста? 0

@bidstrup 418 / 178 / 27 Регистрация: 11.03.2018 Сообщений: 764
	04.06.2019, 13:27	6
	Кто сказал, что арифметика времени производится простым добавлением в поля функции strftime, а в указанных в ссылках модулях, которые ты 'все уже читал', какие-то беспокойные ребята занимаются полнейшей ерундой, разрабатывая данный функционал ? 0

@ghfwer 0 / 0 / 1 Регистрация: 01.12.2015 Сообщений: 16
	04.06.2019, 13:37 [ТС]	7
	так в том-то и проблема ,что простым сложением секунд работает до того момента, пока величина значения не становится слишком "тяжелой" 0

@ghfwer 0 / 0 / 1 Регистрация: 01.12.2015 Сообщений: 16
	05.06.2019, 08:19 [ТС]	9
	ОГОРОМАДНЕЙШЕЕ СПАСИБО! 0

Перевод секунд в дату

Решение