($sec, $min, $hours, $day, $month, $year, $wday, $yday, $isdst) = localtime();

$month += 1;
$year += 1900;
$min = "0$min" if($min < "10");
$sec = "0$sec" if($sec < "10");
$hours = "0$hours" if($hours < "10");
$day = "0$day" if($day < "10");
$month = "0$month" if($month < "10");

print "Heute ist der $day.$month.$year. Es ist $hours:$min:$sec Uhr!";