A.4exov: Aktuelle Zeit (nicht seit 1970)

Beitrag lesen

Versuch's einfach mal so:

Das kann ich:

my ($sek,$min,$std,$mtag,$mon,$jahr,$wtag,$jtag,$isdst) = localtime(time);

$jahr  = 1900 + $jahr;
$mon  = 1 + $mon;

if ($std < 10){ $std  = "0$std"; }
if ($min < 10){ $min  = "0$min"; }
if ($sek < 10){ $sek  = "0$sek"; }
if ($mtag < 10){ $mtag  = "0$mtag"; }
if ($wtag < 10){ $wtag  = "0$wtag"; }
if ($mon < 10){ $mon  = "0$mon"; }
if ($jtag < 10){ $jtag = "0$jtag"; }
if ($isdst < 10){ $isdst = "0$isdst"; }

Nun, wie kriege ich die heutiege Zeit um 00:00:00 in Millisekunden?

Danke