datum darstellen

[conym18]

hallo,

ich bin ein perl neuling.


wie kann ich mir in perl das engl. datumsformat (2004-07-21) in eine variable ausgeben lassen?

in php geht es so:

$datum = dat('Y-m-d');


kann mir da einer helfen?


mfG

conrad

[Byteandi]

my ($Sekunden, $Minuten, $Stunden, $Monatstag, $Monat,
    $Jahr, $Wochentag, $Jahrestag, $Sommerzeit) = localtime(time);

$Monat+=1;
$Jahrestag+=1;
$Monat = $Monat < 10 ? $Monat = "0".$Monat : $Monat;
$Monatstag = $Monatstag < 10 ? $Monatstag = "0".$Monatstag : $Monatstag;
$Jahr+=1900; 

und dann such dir aus wie du es darstellen willst.


Byteandi

[MelloPie]

Also das:
$Monat = $Monat < 10 ? $Monat = "0".$Monat : $Monat;
$Monatstag = $Monatstag < 10 ? $Monatstag = "0".$Monatstag : $Monatstag;

kann man locker mit sprintf abfangen