我有一个日期 $time2 并希望增加一个月,直到 07/01/2015(07/0/2015、07/03/2015、07/04/2015,...)。
增加一天工作正常:
$t2 = strftime( "%m/%d/%Y", localtime( $time2 + 24 * 3600)); # 07/01/2013
增加一个月我有一个错误:
my $t02 = strftime( "%m/%d/%Y", localtime( $time2 + 0 * 3600));
my @t22 = ($t02 =~ m|(\d{2})/(\d{2})/(\d{4})| );
$t22[1]++;
$t2 = $t22[0]."/".$t22[1]."/".$t22[1];
有错误Month '-1' out of range 0..11
如何解决?
代码在这里