[perl] unixtime 을 형식에 맞게 변환(지정된날)

1. 그냥 출력하기

#!/usr/bin/perl

use strict;

use POSIX;

MAIN:

{

    my $unix_time = "1322086860";

    my $date = localtime($unix_time);

    print "$date \n";

}

#출력결과

Thu Nov 24 07:21:00 2011

2. 형식에 맞게 출력하기

#!/usr/bin/perl

use strict;

use POSIX;

MAIN:

{

    my $unix_time = "1322086860";

    my $date = POSIX::strftime("%Y/%m/%d %H:%M", localtime($unix_time));

    print "$date\n";

}

#출력결과

2011/11/24 07:21