日期格式

Time::Piece 在版本 10 之后的 perl 5 中可用

use Time::Piece;

my $date = localtime->strftime('%m/%d/%Y');
print $date;

Output
07/26/2016