>> Read Reply from No. 432 article  
RE: perl에서 시간 형식 변환

등록 2000-02-15 06:14:00     조회 5
이름 적수    

		기본 함수 중에는 mktime 같은 놈이 없더군요. 모듈을 좀 뒤지니까 나와서
알려 드립니다.
 혹시 크래이지 웹보드에서 저장된 데이타가 로칼 타임이라면 timegm 대신에
timelocal을 사용하시면 됩니다.
 timegm(timelocal)에서 month는 0부터 시작하니 받은 값에서 1을 빼는게
맞습니다.
 *-----------------* cut here *---------------*
#!/usr/bin/perl
use Time::Local;
 $date = 19990909123015;
$date =~ /^([0-9]{4})([0-9]{2})([0-9]{2})([0-9]{2})([0-9]{2})([0-9]{2})$/;
 $year = $1;
$mon  = $2 - 1;
$day  = $3;
$hour = $4;
$min  = $5;
$sec  = $6;
 $time = timegm($sec,$min,$hour,$day,$mon,$year);
 printf("%d", $time);
*-----------------* cut here *---------------*
이름
암호


>> 관련글
432 크레이지 게시판을 SQL DB의 게시판으로 바꾸기..  김형숙  2000.03.03  ....
  답장 RE: perl에서 시간 형식 변환  적수  2000.02.15  ....
  목록보기 윗글 아랫글
글쓰기
답장쓰기 수정 삭제
정규표현식 [ 상세 검색 ]
페이지로딩: [ 0.26 초 ] 작업시간: [ 0.04 초 ]

Copyleft 1999-2026 by JSBoard Open Project
Theme Designed by IDOO All right reserved
[TOP]

적수네 동네
+
| 적수네 동네
| 공부방
| 리눅스 잡지 서고
| LSN 소스
| 링크 모음
+---+
게시판
+
| 떠들어보세!
| 질문과 답변
| 새소식과 정보
| 1원짜리 팁?
| 대화방
+---+
칼럼?
+
| 세하 훔쳐보기
| Welcome2nite
| 혜진의 염장판
+---+
리눅스 상표권
+
| 반대 서명란
| 토론 게시판
+---+
GNU
+
| GNU 선언문
| GNU GPL
| GNU 미러 목록
+---+
프로젝트?
+
| 리눅스카운터
| RC5DES
| 실질헌법 제작
+---+
커널 소식
+
| 안정 버젼: 2.4.14
+---+
테마 선택
+
LSN 방송국?
+
| OFF AIR
+---+
회원
+
| 로그인
+---+
[ 적수네 동네 ] [ 리눅스 상표권 독점 반대 ] [ 한글 리눅스 문서 프로젝트 ] [ KrLine ] [ 사랑넷 ] [ Valid HTML 4.0! ] [ SlashDot ] [ Freshmeat ]
Copyleft (C) 1998-2001 Byeong-Chan Kim . License
TIME: 1791048902
System by WYZsoft, HDD by I.O.Linux, Mizi Research, Embryo, WOWLINUX, Domain by SarangNet, Network by KrLine.