Zeitfunktionen in Perl ?!

[Mindwinder]

Hallo,
benötige mal auf die schnelle folgenden PHP - Code in Pearl

$day = date("d",time());   //aktueller Tag
$month = date("m",time()); //aktueller Monat
$year = date("y",time());  //aktuelles Jahr
echo mktime(10,0,0,$month,$day,$year);//Timestamp heute morgen um 10 Uhr

die zahlreichen Klassen hierzu haben mich irgendwie erschlagen - gehts nicht auch einfach ? Also ich brauch Timestamp von heute um z.B. 10.00 Uhr und evtl wenns keine Umstände macht gestern um 10.00 , aber das ist wohl schon etwas schwieriger.... Achja und es sollte natürlich auch übermorgen der Timestamp von übermorgen um 10.00 werden *G*.

Gruß Mindwinder

 

[GH@NDI]

Eine Möglichkeit wäre das Modul Date::Calc was dir alles zur Verfügung stellt, was man nur irgendwie mit unserer Zeitrechnung und unserem Kalender so machen kann.

Aber als pendand zu PHP's date Funktion gibt es in Perl die Funktion strftime() welche im POSIX Standard verankert ist und dadurch in alle gängigen Betriebssystemen auch als systemcall zur Verfügung steht. Mehr zur Verwendung dazu, findet sich in der Doku des POSIX Moduls unter strftime().

Für die mktime gibts in Perl das Time::Local Modul das dir entsprechende Funktionen zur Verfügung stellt.

Hoffe geholen zu haben!

Gruß,
Sven