>######################## 현재 월, 일 구하기 #################
>($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime(time);
>
>print "$year년 $mon월 $mday일<P>\n\n";
>print "$hour시 $min분 $sec초<P>\n\n";
>
>위와 같이 해서 현재 년, 월, 일을 구하고 싶습니다.
>해보니깐, 오늘은 2001년 4월 18일인데, 101년 3월 18일로 나옵니다...
>18일은 맞는데... 년과 월이 안맞는데...
>월은 하나 증가시키면 될 텐데....
>년은 3자리로 나오는데.... 뒤 두자리만 자르는 방법을 모르겠네요...
>좀 가르쳐주시겠습니까....??
안녕하세요, HappyCGI 팀의 vopos입니다.
Perl의 localtime() 함수에서 년(year)이 2000년인가 2001년 이후부터는 세자리로
나온답니다. 1900을 더해주면 해결되겠습니다. ($year = $year + 1900)
3월로 나오는 것은 서버의 시간이 잘못
34
546
2001-04-19 11:11:06
닉네임
