perl 날짜구하기

use strict;
use POSIX;

print POSIX::strftime("%Y/%m/%d %H:%M:%S", localtime(time()));