#!/usr/bin/perl
use POSIX;
MAIN:
{
my $c_date = POSIX::strftime("%Y%m%d%H%M%S", localtime(time()));
print "$c_date \n";
}
'업무 > Perl' 카테고리의 다른 글
| [perl] GUI 프로그램 - Wx 인스톨 절차 (0) | 2011.11.09 |
|---|---|
| [perl] 펄로 MySQL 사용하기 (0) | 2011.10.29 |
| [perl] 한라인으로 배열 출력 (0) | 2011.10.26 |
| [perl] 정규식 옵션 (0) | 2011.10.21 |
| [perl] 임시... (0) | 2011.09.21 |