use DateTime;

$dt = DateTime->new( year   => 1964,
                     month  => 10,
                     day    => 16,
                     hour   => 16,
                     minute => 12,
                     second => 47,
                     nanosecond => 500000000,
                     time_zone => 'Asia/Taipei',
                   );

$dt = DateTime->from_epoch( epoch => $epoch );
$dt = DateTime->now; # same as ( epoch => time() )

$year   = $dt->year;
$month  = $dt->month;          # 1-12 - also mon
$day    = $dt->day;            # 1-31 - also day_of_month, mday

$dow    = $dt->day_of_week;    # 1-7 (Monday is 1) - also dow, wday

$hour   = $dt->hour;           # 0-23
$minute = $dt->minute;         # 0-59 - also min

$second = $dt->second;         # 0-61 (leap seconds!) - also sec