use POSIX qw( strftime );
my $time = 400_000_000;
print strftime("%y/%m/%d %H:%M\n", localtime($time));