如何在perl中打印日期？
在Perl中打印日期可以使用内置的日期和时间模块DateTime来实现。下面是一个示例代码：
use DateTime;
my $dt = DateTime->now;
print $dt->ymd; # 打印日期，格式为YYYY-MM-DD上述代码首先使用DateTime->now创建一个当前日期和时间的对象$dt，然后使用$dt->ymd方法打印日期部分。
除了ymd方法，DateTime模块还提供了其他方法来打印日期和时间的不同部分，例如：
$dt->year：打印年份$dt->month：打印月份$dt->day：打印天数$dt->hour：打印小时$dt->minute：打印分钟$dt->second：打印秒数
你可以根据需要选择适合的方法来打印日期和时间的不同部分。
关于腾讯云相关产品和产品介绍链接地址，由于要求不能提及具体的云计算品牌商，我无法提供相关链接。但你可以在腾讯云官方网站上查找与日期相关的产品和文档。
相关·内容
4回答
如何使用DateTime获取当月的最后一天？
perl、datetime
我的任务是计算当月的最后一天。
在中有一个方法last_day_of_month。你可以这样称呼它：
$av_tmp_TODAY = DateTime->last_day_of_month({year=>2016,month=>05});
但我不想设置固定的年份和月份，我只想取今天的日期，并获得该月的最后一天。
此外，我希望我的输出采用%Y-%m-%d格式。
浏览 1提问于2016-05-02得票数 3
3回答
如何以Perl格式获取系统时钟？
perl、datetime
我希望得到系统时钟(时间和日期)，并以人类可读的格式以Perl显示它。像2014-09-12 15:13:56这样的格式
#!/usr/local/bin/perl
my %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,
$daylightS
浏览 5提问于2014-09-12得票数 3
回答已采纳
3回答
perl datetime添加月份在dst时区失败。
perl、datetime、timezone、dst
这两行是测试数据。
my $dt = DateTime->new( {
year => 2014, month => 9, day => 19,
hour => 00, minute=> 00, second=> 00});
$dt->set_time_zone(DateTime::TimeZone->new( name => 'America/Sao_Paulo' ));
现在我想用一个月加上失败的日期。
$dt->add ( months => 1 );
# This f
浏览 4提问于2014-11-20得票数 0
回答已采纳
3回答
如何在Perl中考虑月份中的不同日期来返回几个月？
perl、function、date、time、localtime
我想知道是否有一个内置的Perl函数可以调整日期，如果您从它取一个月。例如，如果日期是31号，如果没有31天，它将调整为上个月的月底。
如果不是连续31天的月份(12月/1月，7月/8月)和2月，我会很容易地将其更改为30号。我只想把日期存储在离当前日期很远的一段时间，例如
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
$current_date = join("-", (1900+$year), ($mon+1), $mday);
$one_month_ago = jo
浏览 1提问于2012-08-29得票数 5
回答已采纳
5回答
如何在Perl中更改DateTime值的时区？
perl、timezone、solaris、epoch
使用此函数：
perl -e 'use Time::Local; print timelocal("00","00","00","01","01","2000"),"\n";'
它将返回一个纪元时间-但仅在格林尼治标准时间-如果我想要GMT+1格式的结果(这是系统本地时间(TZ))，我需要更改什么？
提前谢谢你，
安德斯
浏览 0提问于2010-02-01得票数 7
回答已采纳
2回答
Perl DateTime时代是毫秒还是秒？
javascript、perl、datetime
我需要比较我的后端(在Perl中)给出的时间戳和by前端的时间戳(在JS中)，所以我需要确保它们都使用相同的时间单元。
对于JS来说很容易，
一个数字，表示从1970年1月1日00:00:00 UTC到给定日期之间经过的毫秒。
对于Perl， about $dt->epoch()说：
返回datetime对象的UTC时代值。时代开始前的数据将作为负数返回。
此方法的返回值始终是整数。
由于历法不计算闰秒，所以1972-12-31T23:59:60 (UTC)的划时代时间与1973-01-01T00:00:00完全相同。
对我来说，不清楚返回的整数是毫秒还是秒(在第二种情况
浏览 0提问于2018-09-20得票数 3
回答已采纳
5回答
如何使用Perl的DateTime获取每月的第一天和最后一天？
perl、datetime
有没有一种方法可以计算出一个月的第一天(最小一天)和最后一天(最大一天)，给定月份作为输入，使用perl语言中的DateTime？
到目前为止，我想出了如何传递第一次约会，最后一次约会来给我一个天数范围。
但我现在想做的就是传入一个月作为参数，比如201203，然后返回min，maxday。
使用DateTime可以做到这一点吗？
另外，我希望将日期格式掩码从YYYYMMDD更改为YYYY-MM-DD。
use strict;
use warnings;
use DateTime;
unless(@ARGV==2)
{
print &#
浏览 1提问于2012-03-31得票数 14
回答已采纳
2回答
时间作为输入，用Perl打印时间表。
perl、time
我想用perl编写一个脚本，在给定的输入时间(例如07:55)中，打印一个时间表，时间为15分钟、-25分钟、+1h 30分钟等。
Input: 07:55 (or 0755, or separate hours and minutes)
Expected output: Thing 1: 07:40
Thing 2: 07:30
Thing 3: 08:25
但我在寻找可能的函数或简单的方法时遇到了麻烦(我只想出一分钟加if，万一值大于59，等等)。有什么建议吗?谢谢。
浏览 2提问于2014-11-24得票数 0
回答已采纳
5回答
如何在Perl中读取系统时间和日期？
perl、datetime
我需要读取系统时钟(时间和日期)，并以可读的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
浏览 11提问于2009-01-28得票数 11
回答已采纳
2回答
用于备份Rackspace上的数据库的Perl脚本
perl、cron、rackspace
尝试在Rackspace站点上使用Perl cron作业备份我们的数据库。
Rackspace给出了一个示例：
#!/bin/sh
mysqldump -h DB_HOST -u DB_USER -p'DB_PASSWORD' DB_NAME > YOUR_WEB_ROOT/db_backup.sql
gzip -f YOUR_WEB_ROOT/db_backup.sql
这很好用，但我希望在文件名中添加一个时间戳。我有一小段生成时间戳的代码：
use strict;
use warnings;
use DateTime;
my $dt = DateTime->
浏览 2提问于2013-04-02得票数 2
回答已采纳
2回答
如何使用UTC偏移量在Perl中获取本地时间？
perl、timezone
如果我有位置，我知道如何使用时区转换来获取本地时间：
my $localTime = DateTime->now( time_zone => 'America/New_York' );
但我目前只有UTC TimeZone号码，例如：
my $UTCzone = 5;
my $UTCzone = -2;
etc.
在这种情况下我该如何转换？
浏览 0提问于2014-09-06得票数 1
回答已采纳
3回答
perl日期计算，日期格式为2012-02-03 00:00:00
perl、date
我需要一些关于perl中日期计算的帮助，日期格式为"2012-02-03 00:00:00“。特别是，有没有一个工具可以用来增加天数，然后它就可以正确地切换到月和年？谢谢。
浏览 4提问于2012-04-09得票数 3
2回答
我有这段代码，它得到了最近的星期五，不管当前的日期是什么：
for(my $i = 1; $i < 8; $i++) {
my $t = time() + $i * 24 * 3600;
next unless (localtime($t))[6] == 5; # friday
$nextfri = scalar(localtime($t));
浏览 1提问于2018-05-09得票数 2
回答已采纳
10回答
PHP DateTime集合到最近的10分钟
php、datetime
我正在从mysql字段中检索一个日期时间，但我需要将它循环到，将循环到最近的10分钟。
例如，如果日期为2013-11-06 14:00:01，我想将时间返回为6/11/2013 14:10。
做这件事最简单的方法是什么？
$datetime = new DateTime($mysqldata);
echo $datetime->format('d/m/Y G:i');
任何建议都很感激。
谢谢。
浏览 1提问于2013-11-06得票数 17
回答已采纳
2回答
如何从iso8601 datei和perl中获取数据格式
perl、iso8601
我正在解析数据并得到一个日期。然后将其转换为iso8601对象。然而，我被困在试图得到的只是一年的月份日期格式。
use DateTime::Format::ISO8601;
use POSIX qw(strftime);
my $dt_str = 'Frank_Gibson.20180703T230600.Program_Manager.New_York.doc';
my @perl_time_array = split /\./, $dt_str;
my $dt = DateTime::Format::ISO8601->parse_datetime($perl_tim
浏览 3提问于2019-10-24得票数 1
回答已采纳
4回答
使用unix时间计算日期
unix、unix-timestamp
在unix中查找帮助，以使用unix date获取以下日期戳：
today at 12:00am
12:00am - 15 days ago
12:00am - 30 days ago
以Unix纪元时间表示？(1300295838)
浏览 4提问于2011-03-17得票数 0
回答已采纳
2回答
如何在perl中实现addate实用程序？
perl、date、strftime
我对perl没有经验，我需要创建一个实用程序，它将在添加偏移量之后打印日期，格式字符串是一个strftime格式字符串。
格式：./adddate number_of_days format_string
示例：./adddate -1 "%a，%b %d“#打印昨天的日期
浏览 4提问于2012-09-08得票数 1
3回答
Perl和纪元时间问题
perl、datestamp
如何从perl中获取当前的纪元时间，并找到6个月前的纪元时间？
我需要比较一个文件的创建日期，看看它是否6个月或更早。
浏览 6提问于2011-06-29得票数 2
2回答
Perl时间，日期转换错误
perl、date、format
这是一个perl脚本，用于从10月1日开始的100天内每天提取sql数据，并且SQL在日期格式(yyyy-mm-dd)上非常挑剔，所以我编写了如下脚本。但是，在2011-11-06特定日期，时间到日期转换不正确，开始日期和结束日期变得相同。
$srt_date='2011-11-06'
$end_date='2011-11-06'
我不知道这是perl错误还是其他原因。
use DBI;
use DBD::Oracle qw(:ora_types);
use Compress::Zlib;
use FileHandle;
use Date::Parse;
use
浏览 0提问于2012-05-08得票数 2
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
