datum berechnen: datum aus wochetag berechnen - #56023 (Allgemeines zu Perl)

Strat

2005-07-05 19:54

User since
2003-08-04
5246 Artikel
ModeratorIn

time gibt aktuelle zeit/datum zurueck, allerdings in unix epoch seconds (anzahl sekunden seit dem 1.1.1970). das ist ganz nett zum rechnen, aber nicht besonders gut lesbar. mit localtime kannst du diese unix epoch seconds in was aussagekraeftigeres verwenden:

localtime(time) gibt eine liste zurueck:
sek,min,stunde,tag,monat,jahr,wochentag,jahrestag, sommerzeitAktiv(1/0)

Code: (dl )

1
2
3

my @date = localtime(time);
$date[4]++; # monat januar ist 0, soll aber 1 werden
$date[5] += 1900; # jahr beginnt bei 1900, also 1900 dazuzaehlen: 105 => 2005

den heutigen wochentag bekommst du so durch:

Code: (dl )

my $wday = ( localtime(time) )[6];

0 ... sonntag
1 ... montag
...
6 ... samstag

lies dir mal folgende perldoc's durch:
perldoc -f time
perldoc -f localtime
perldoc Time::Local

und wenn du es etwas komfortabler haben willst:
perldoc Date::Calc

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/