使用Time::Piece解析Perl日期字符串

使用Time::Piece解析Perl日期字符串,perl,strptime,Perl,Strptime,由于某些原因,我在使用Time::Piece解析日期字符串时遇到了很多麻烦 所以这是可行的: my $t = Time::Piece->strptime( 'Sunday, November 4, 2012 10:25:15 PM -0000' , "%A, %B %d, %Y %I:%M:%S %p %z" ); print $t; 但这并不是: my $temp_time = Time::Piece->strptime('7/23/2014 5:24:22 PM',

由于某些原因,我在使用Time::Piece解析日期字符串时遇到了很多麻烦

所以这是可行的:

my $t = Time::Piece->strptime( 'Sunday, November 4, 2012 10:25:15 PM -0000' , "%A, %B %d, %Y    %I:%M:%S %p %z" );
  print $t;
但这并不是:

my $temp_time = Time::Piece->strptime('7/23/2014 5:24:22 PM', "%-m/%-d/%Y %l:%M:%S %p");
print $temp_time;
我还将“%D%r”用作格式字符串,但这也不起作用。你们当中有人知道为什么会这样吗?作为参考,小时是1-12(不是01-12),月份是1-12(不是0-12)

谢谢

变化

"%-m/%-d/%Y %l:%M:%S %p"

"%m/%d/%Y %l:%M:%S %p"