sub getMysqlTime($){ my $val = shift; my @ary = gmtime($val); my $year = $ary[5] +1900; my $month = $ary[4] + 1; my $day = $ary[3]; my $hour=$ary[2]; my $min=$ary[1]; my $sec= $ary[0]; my $time = sprintf("%04i-%02i-%02i %02i:%02i:%02i",$year,$month,$day,$hour,$min,$sec); return($time); }