Tom: Linux-Zeit in "normale" Zeit umrechnen

Beitrag lesen

Hi Forian,

also für Perl kannst Du das mal probieren:

&uhrzeit;

print "Content-type: text/html\n\n";
print "uhr";

sub uhrzeit {
   ($sec,$min,$hour) = localtime(time);

if ($sec < 10) {
      $sec = "0$sec";
   }
   if ($min < 10) {
      $min = "0$min";
   }
   if ($hour < 10) {
      $hour = "0$hour";
   }

$uhr = "$hour:$min:$sec";
   chop($uhr) if ($uhr =~ /\n$/);

$time = time();
  
}

Gruß
Tom