Thread View: pl.comp.lang.perl
6 messages
6 total messages
Started by Paweł Matejski
Tue, 09 Mar 2010 19:47
Obliczanie daty.
Author: Paweł Matejski
Date: Tue, 09 Mar 2010 19:47
Date: Tue, 09 Mar 2010 19:47
7 lines
913 bytes
913 bytes
Witam. Potrzebuję w perlu znaleźć datę: pierwszy dzień zeszłego miesiąca. Jak to zrobić jakoś prosto? -- P.M.
Re: Obliczanie daty.
Author: Bartosz Feński aka fEnIo
Date: Tue, 09 Mar 2010 20:58
Date: Tue, 09 Mar 2010 20:58
14 lines
1348 bytes
1348 bytes
W artykule Paweł Matejski napisał(a): > Potrzebuję w perlu znaleźć datę: pierwszy dzień zeszłego miesiąca. Jak to zrobić jakoś prosto? Od aktualnego numeru miesiąca odjąć jeden, a dniem będzie 1. pozdr, fEnIo -- ,''`. Bartosz Fenski | mailto:fenio@debian.org | pgp:0x13fefc40 | irc:fEnIo : :' : 32-050 Skawina - Glowackiego 3/15 - malopolskie v. - Poland `. `' phone:+48602383548 | proud Debian maintainer and user `- http://fenski.pl | xmpp:fenio@jabber.org | rlu:172001
Re: Obliczanie daty.
Author: hubert depesz lubaczewski
Date: Tue, 09 Mar 2010 21:06
Date: Tue, 09 Mar 2010 21:06
12 lines
1278 bytes
1278 bytes
On 2010-03-09, Paweł Matejski <madej@nospam.madej.pl.eu.org> wrote: > Potrzebuję w perlu znaleźć datę: pierwszy dzień zeszłego miesiąca. Jak to zrobić jakoś prosto? tak najprosciej - wyciagnij rok miesiac z localtime(), sprawdz czy miesiac jest >1. jkak tak to odejmij 1 od miesiaca i po sprawie. jak nie - rok = rok - 1, miesiac = 12. depesz -- Linkedin: http://www.linkedin.com/in/depesz / blog: http://www.depesz.com/ jid/gtalk: depesz@depesz.com / aim:depeszhdl / skype:depesz_hdl / gg:6749007
Re: Obliczanie daty.
Author: Michal Jankowski
Date: Tue, 09 Mar 2010 21:20
Date: Tue, 09 Mar 2010 21:20
3 lines
926 bytes
926 bytes
perl -e 'use Date::Calc qw(:all); ($y,$m)=Add_Delta_YM(Today,0,-1);printf "01-%02d-%4d\n",$m,$y;' MJ
Re: Obliczanie daty.
Author: A.L.E.C
Date: Wed, 10 Mar 2010 08:07
Date: Wed, 10 Mar 2010 08:07
14 lines
1219 bytes
1219 bytes
Paweł Matejski wrote:
> Witam.
>
> Potrzebuję w perlu znaleźć datę: pierwszy dzień zeszłego miesiąca. Jak to zrobić jakoś prosto?
i jeszcze tak (plus formatowanie daty):
perl -e 'use POSIX; print strftime("%Y-%m-%d",
localtime(mktime(0,0,0,1,(localtime)[4]-1,(localtime)[5])));'
--
Aleksander 'A.L.E.C' Machniak http://alec.pl gg:2275252
LAN Management System Developer http://lms.org.pl
Roundcube Webmail Developer http://roundcube.net
Re: Obliczanie daty.
Author: Paweł Matejski
Date: Wed, 10 Mar 2010 14:38
Date: Wed, 10 Mar 2010 14:38
16 lines
1324 bytes
1324 bytes
A.L.E.C wrote:
> Paweł Matejski wrote:
>> Witam.
>>
>> Potrzebuję w perlu znaleźć datę: pierwszy dzień zeszłego miesiąca. Jak
>> to zrobić jakoś prosto?
>
> i jeszcze tak (plus formatowanie daty):
>
> perl -e 'use POSIX; print strftime("%Y-%m-%d",
> localtime(mktime(0,0,0,1,(localtime)[4]-1,(localtime)[5])));'
A to mnie zaskoczyło, że tak działa. Ale pasuje mi to rozwiązanie w sumie. :)
--
P.M.
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