相关疑难解决方法(0)

我需要读取系统时钟(时间和日期)并在Perl中以人类可读的格式显示它.

目前,我正在使用以下方法(我在这里找到):

#!/usr/local/bin/perl
@months = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
@weekDays = qw(Sun Mon Tue Wed Thu Fri Sat Sun);
($second, $minute, $hour, $dayOfMonth, $month, $yearOffset, $dayOfWeek, $dayOfYear, $daylightSavings) = localtime();
$year = 1900 + $yearOffset;
$theTime = "$hour:$minute:$second, $weekDays[$dayOfWeek] $months[$month] $dayOfMonth, $year";
print $theTime; 

当您运行该程序时,您应该看到更加可读的日期和时间,如下所示:

9:14:42, Wed Dec 28, 2005 

这似乎更像是为了说明而不是实际的生产代码.有更规范的方式吗？

我遇到了如何将datetime格式从 my转换db为html datetime-local. 这是我的数据库中的数据格式：

2020-07-18T17:25:00Z

当我尝试将此数据传递给具有某种类型的 html 输入时，datetime-local它会向我发出如下警告：

这是我的 html 代码，其中包含格式化值：

<input type="datetime-local" required="" value="{{order.pick_up_datetime|date:'Y-m-dTh:i a'}}">