如何在Perl中获取DateTime对象的年份？

在Perl中获取DateTime对象的年份可以使用DateTime模块提供的year()方法。该方法返回DateTime对象的年份。

以下是一个示例代码：

use DateTime;

# 创建一个DateTime对象
my $dt = DateTime->now;

# 获取年份
my $year = $dt->year;

print "当前年份：$year\n";

在上述代码中，首先使用DateTime模块创建了一个DateTime对象$dt。然后，通过调用year()方法，将DateTime对象的年份赋值给变量$year。最后，使用print语句输出年份。

推荐的腾讯云相关产品：无

参考链接：DateTime模块文档