my ($sec, $min, $hour, $mday, $mon, $year) = localtime($_[0]);
$mon  += 1;
$year += 1900;
$ampm = ( $hour < 12 ? 'am' : 'pm' );
$hour %= 12;
$hour += 12 if !$hour;
$time = sprintf("%d:%02d%s %d/%02d/%02d",
   $hour, $min, $ampm, $mon, $mday, $year
);