Log-Zeitabgleich

  • Copyright 2001 by Trevize (Wladimir Palant)

    Quellcode

    1. sub toDate
    2. {
    3. my($time) = @_;
    4. my($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($time+$time_distance*3600);
    5. $mon++;
    6. $year = 1900 + $year;
    7. return sprintf("%.2i.%.2i.%.4i %.2i:%.2i:%.2i",$mday,$mon,$year,$hour,$min,$sec);
    8. }

    2.091 mal gelesen