如何使用format_cldr(“ LLL”)打印首字母大写的月份名称

时间:2018-12-05 14:01:03

标签: perl

我正在使用format_cldr(“ LLL”),它给了我jan,feb,mar,...但我需要首字母大写:Jan,Feb,Mar,...

我尝试使用ucfirst(),但没有成功。

这是我的代码:

while ($i < 13) {
  my $d = DateTime->new(year=>1111, month => $i, day=>1);
  $d->set_locale($self->context->locale);
  @$climate[$i-1]->{month_name} = $d->format_cldr("LLL");
  $i = $i + 1;
}

需要帮助,在此先感谢

1 个答案:

答案 0 :(得分:1)

您说您尝试过ucfirst,但没有向我们展示如何操作。

这将起作用:

 @$climate[$i-1]->{month_name} = ucfirst $d->format_cldr("LLL");