|
#------------------------------------------------------------------------------#
sub get_time {
#------------------------------------------------------------------------------#
$msg_time_num = time;
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($msg_time_num);
$sec = "0$sec" if ($sec < 10);
$min = "0$min" if ($min < 10);
$hour = "0$hour" if ($hour < 10);
$mday2 = $mday;
$mday2 = "0$mday" if ($mday < 10);
$month = $mon + 1;
$month2 = "0$month" if ($month < 10);
@MONTHS = ("1월","2월","3월","4월","5월","6월","7월","8월","9월","10월","11월","12월");
$date = "$month2/$mday2 $hour\:$min";
$year2 = 1900 + $year;
$long_date = "$year2년 $MONTHS[$mon]$mday일 $hour시$min분$sec초";
}
|
|
