Select Code to Download

# This function will return 1 if it is a leap year, or 0 if it's not

sub LeapYear 
...
    $iTime += $iDay;
    return $iTime;
}

($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time
+);
my $timestamp = &LocaltimeExcel( $sec, $min, $hour, $mday, $mon, $year
+ );
$timestamp =~ s/\./\,/;

print $timestamp;