Perl 中的 POSIX 函数 strftime()


您可以在 Perl 中使用 POSIX 函数 **strftime()** 来格式化日期和时间,借助下表。请注意,标有星号 (*) 的说明符是与区域设置相关的。

说明符替换为示例
%a缩写的工作日名称 *Thu
%A完整的工作日名称 *Thursday
%b缩写的月份名称 *Aug
%B完整的月份名称 *August
%c日期和时间表示 *Thu Aug 23 14:55:02 2001
%C年份除以 100 并截断为整数 (00-99)20
%d月份中的日期,用零填充 (01-31)23
%D短日期 MM/DD/YY,等效于 %m/%d/%y08/23/01
%e月份中的日期,用空格填充 ( 1-31)23
%F短日期 YYYY-MM-DD,等效于 %Y-%m-%d2001-08-23
%g基于周的年份,后两位数字 (00-99)01
%G基于周的年份2001
%h缩写的月份名称 * (与 %b 相同)Aug
%H24 小时制的小时 (00-23)14
%I12 小时制的小时 (01-12)02
%j一年中的日期 (001-366)235
%m月份作为十进制数字 (01-12)08
%M分钟 (00-59)55
%n换行符 ('\n')
%pAM 或 PM 指示PM
%r12 小时制的时间 *02:55:02 pm
%R24 小时制 HH:MM 时间,等效于 %H:%M14:55
%S秒 (00-61)02
%t水平制表符 ('\t')
%TISO 8601 时间格式 (HH:MM:SS),等效于 %H:%M:%S14:55
%uISO 8601 工作日作为数字,星期一为 1 (1-7)4
%U星期数,第一个星期日作为第一周的第一天 (00-53)33
%VISO 8601 星期数 (00-53)34
%w工作日作为十进制数字,星期日为 0 (0-6)4
%W星期数,第一个星期一作为第一周的第一天 (00-53)34
%x日期表示 *08/23/01
%X时间表示 *14:55:02
%y年份,后两位数字 (00-99)01
%Y年份2001
%zISO 8601 UTC 时区的偏移量 (1 分钟 = 1,1 小时 = 100) 如果时区无法终止,则无字符+100
%Z时区名称或缩写 * 如果时区无法终止,则无字符CDT
%%一个 % 符号%

让我们检查以下示例以了解用法 -

示例

在线演示

#!/usr/local/bin/perl
use POSIX qw(strftime);
$datestring = strftime "%a %b %e %H:%M:%S %Y", localtime;
printf("date and time - $datestring\n");
# or for GMT formatted appropriately for your locale:
$datestring = strftime "%a %b %e %H:%M:%S %Y", gmtime;
printf("date and time - $datestring\n");

输出

执行以上代码时,会产生以下结果 -

date and time - Sat Feb 16 07:10:23 2013
date and time - Sat Feb 16 14:10:23 2013

更新于: 29-Nov-2019

12K+ 浏览量

开启您的 职业生涯

通过完成课程获得认证

开始学习
广告