对表示日期时间/时间戳的字符串进行排序

Jim*_*Jim 1 string macos perl date

我有一组以下列格式表示日期时间的字符串:
1/30/2017 10:46:13 AM
我想对它们进行排序,因此我尝试将它们转换为实际日期,如下所示:

my $format = "%m/%d/%Y %H:%M:%S";    
my $date1= Time::Piece->strptime($the_date_string, $format );      
Run Code Online (Sandbox Code Playgroud)

它在解析时出错.我怎样才能做到这一点?

sim*_*que 7

我运行代码时遇到的错误是

在strptime中字符串末尾的垃圾:AM

你缺少期间标记AM您的字符串.添加%p到模式,该模式解析ante meridiempost meridiem的本地表示.在你的情况下,那是上午下午.

my $format = "%m/%d/%Y %H:%M:%S %p";
my $date1= Time::Piece->strptime('1/30/2017 10:46:13 AM', $format );
Run Code Online (Sandbox Code Playgroud)