use POSIX(); print POSIX::strftime('%Y-%m-%d-%H-%M-%S', localtime);