Thread View: pl.comp.os.linux.programowanie
6 messages
6 total messages
Started by Komuch
Thu, 15 Sep 2011 22:27
PERL - epoch i strefy czasowe
Author: Komuch
Date: Thu, 15 Sep 2011 22:27
Date: Thu, 15 Sep 2011 22:27
25 lines
1363 bytes
1363 bytes
Witam
Mam sobie takie coś:
$sellday = DateTime->from_epoch( epoch => $ref->{'cdate'} );
$syear = $sellday->year;
$smonth = $sellday->month;
$sday = $sellday->day;
$sdow = $sellday->day_of_week;
Z jego wyliczeń, data sprzedaży to 31.07.2011, jednak faktycznie było to
1.08.2011, godzina 1:00
Czyli widać, że operuje na UTC.
Jak mogę w prosty sposób dodać do tego offset ?
Owszem można zrobić ify i sprawdzać kiedy to było, ewentualnie dodać
godzinę lub dwie, w zależności od daty.
Ale czy da się jakoś inaczej ?
Z góry dzięki.
Pozdrawiam
Re: PERL - epoch i strefy czasowe
Author: Waldek M.
Date: Fri, 16 Sep 2011 05:20
Date: Fri, 16 Sep 2011 05:20
17 lines
1430 bytes
1430 bytes
Dnia Fri, 16 Sep 2011 00:27:19 +0200, Komuch napisał(a):
> Mam sobie takie coś:
> $sellday = DateTime->from_epoch( epoch => $ref->{'cdate'} );
>
[...]
>
> Jak mogę w prosty sposób dodać do tego offset ?
Użyta przez Ciebie metoda from_epoch() pobiera też i strefę
czasową. Wystarczy ją przekazać.
http://search.cpan.org/~drolsky/DateTime-0.70/lib/DateTime.pm#Local_vs._UTC_and_24_hours_vs._1_day
http://search.cpan.org/~drolsky/DateTime-0.70/lib/DateTime.pm#Invalid_Local_Times
BTW, nie ta grupa. Lepsza byłaby pl.comp.lang.perl.
Pozdrawiam,
Waldek
Re: PERL - epoch i strefy czasowe
Author: Komuch
Date: Fri, 16 Sep 2011 17:53
Date: Fri, 16 Sep 2011 17:53
28 lines
1811 bytes
1811 bytes
W dniu 11-09-16 07:20, Waldek M. pisze:
> Dnia Fri, 16 Sep 2011 00:27:19 +0200, Komuch napisał(a):
>> Mam sobie takie coś:
>> $sellday = DateTime->from_epoch( epoch => $ref->{'cdate'} );
>>
> [...]
>>
>> Jak mogę w prosty sposób dodać do tego offset ?
>
> Użyta przez Ciebie metoda from_epoch() pobiera też i strefę
> czasową. Wystarczy ją przekazać.
> http://search.cpan.org/~drolsky/DateTime-0.70/lib/DateTime.pm#Local_vs._UTC_and_24_hours_vs._1_day
> http://search.cpan.org/~drolsky/DateTime-0.70/lib/DateTime.pm#Invalid_Local_Times
>
Faktycznie. Mogłem od tego zacząć...
> BTW, nie ta grupa. Lepsza byłaby pl.comp.lang.perl.
>
I tu jest problem, bo nie znalazłem jej, filtrowałem... odświeżałem
listę grup i nie znalazłem tej grupy.
W każdym razie sorki za zaśmiecanie i raz jeszcze dzięki za pomoc.
> Pozdrawiam,
> Waldek
Pozdrawiam :)
Re: PERL - epoch i strefy czasowe
Author: Stachu 'Dozzie' K.
Date: Mon, 19 Sep 2011 07:44
Date: Mon, 19 Sep 2011 07:44
15 lines
1701 bytes
1701 bytes
On 2011-09-16, Komuch <komuch@gmail.com> wrote: >> BTW, nie ta grupa. Lepsza byłaby pl.comp.lang.perl. >> > > I tu jest problem, bo nie znalazłem jej, filtrowałem... odświeżałem > listę grup i nie znalazłem tej grupy. > > W każdym razie sorki za zaśmiecanie i raz jeszcze dzięki za pomoc. To jeszcze dowiedz się jak się pisze "Perl". perldoc -q difference -- Secunia non olet. Stanislaw Klekot
Re: PERL - epoch i strefy czasowe
Author: R. P.
Date: Mon, 19 Sep 2011 16:26
Date: Mon, 19 Sep 2011 16:26
13 lines
1612 bytes
1612 bytes
W dniu 2011-09-19 09:44, Stachu 'Dozzie' K. pisze: > On 2011-09-16, Komuch<komuch@gmail.com> wrote: >>> BTW, nie ta grupa. Lepsza byłaby pl.comp.lang.perl. >>> >> >> I tu jest problem, bo nie znalazłem jej, filtrowałem... odświeżałem >> listę grup i nie znalazłem tej grupy. >> >> W każdym razie sorki za zaśmiecanie i raz jeszcze dzięki za pomoc. > > To jeszcze dowiedz się jak się pisze "Perl". A to aż takie istotne?
Re: PERL - epoch i strefy czasowe
Author: Stachu 'Dozzie' K.
Date: Mon, 19 Sep 2011 16:32
Date: Mon, 19 Sep 2011 16:32
20 lines
1920 bytes
1920 bytes
On 2011-09-19, R. P. <robert.piegus@wp.pl> wrote: > W dniu 2011-09-19 09:44, Stachu 'Dozzie' K. pisze: >> On 2011-09-16, Komuch<komuch@gmail.com> wrote: >>>> BTW, nie ta grupa. Lepsza byłaby pl.comp.lang.perl. >>>> >>> >>> I tu jest problem, bo nie znalazłem jej, filtrowałem... odświeżałem >>> listę grup i nie znalazłem tej grupy. >>> >>> W każdym razie sorki za zaśmiecanie i raz jeszcze dzięki za pomoc. >> >> To jeszcze dowiedz się jak się pisze "Perl". > > A to aż takie istotne? To niegrzeczne olewać prawidłową pisownię narzędzia, którego używasz. -- Secunia non olet. Stanislaw Klekot
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads