Time :: Piece将两个不同对象的日期和时间放在一起

Question

我创建了两个Time :: Piece对象。我想将object1的日期连接到object2的时间，也就是说 object1= 2014-05-09 object2= 12:34:40 object3= 2014-05-09T12:34:40

是否有人提示，如何使用Time :: Piece？ Thankx！

Answer 1

Time::Piece不是一个特别聪明的课程。它的大部分方法都是以不同的格式获取其组件。

但你可以从$ object1

获取日期

my $date = $object1->date;

你可以从$ object2获得时间

my $time = $object2->time;

如果您只想将新时间作为字符串，那么您的工作就完成了。

my $object3 = $date . 'T' . $time;

但是如果你想要一个新的Time :: Piece对象，你可以使用类的strptime方法创建一个。

my $object3 = Time::Piece->strptime($date . 'T' . $time, '%Y-%m-%dT%H:%M:%S');