• linkedu视频
  • 平面设计
  • 电脑入门
  • 操作系统
  • 办公应用
  • 电脑硬件
  • 动画设计
  • 3D设计
  • 网页设计
  • CAD设计
  • 影音处理
  • 数据库
  • 程序设计
  • 认证考试
  • 信息管理
  • 信息安全
菜单
linkedu.com
  • 网页制作
  • 数据库
  • 程序设计
  • 操作系统
  • CMS教程
  • 游戏攻略
  • 脚本语言
  • 平面设计
  • 软件教程
  • 网络安全
  • 电脑知识
  • 服务器
  • 视频教程
  • vbs
  • DOS/BAT
  • hta/htc
  • python
  • perl
  • VBA
  • ColdFusion
  • ruby
  • PowerShell
  • Lua
  • Golang
  • linux shell
您的位置:首页 > 脚本语言 >perl > 讲Perl中的本地时间与UNIX时间戳间相互转换的方法

讲Perl中的本地时间与UNIX时间戳间相互转换的方法

作者: 字体:[增加 减小] 来源:互联网

通过本文主要向大家介绍了unix时间戳,unix时间戳转换工具,unix时间戳转换,unix时间戳转换公式,excel unix时间戳等相关知识,希望对您有所帮助,也希望大家支持linkedu.com www.linkedu.com

当你的Perl脚本需要解决时间信息,这里有两种方法来表示和处理日期和时间。一种方法是易读的时间表示(例,"Sat Mar 14 10:14:05 EDT 2015"),另外一种是使用UNIX时间戳(也叫“新纪元时间”),这是从1970年1月1日到今所经过的时间秒数。每一种方法都有它自己的优劣势,取决于你的需要,也许也就需要转换一种格式到另一种。
Perl中转换本地时间到UNIX时间戳

为了从日期字符串中获得UNIX时间,可以使用Date::Parse模块中str2time()函数。此函数可以处理多种格式,例如:

  Sat Mar 14 10:14:05 EDT 2015
  3/14/2015 10:14:05 -0400
  14/Mar/15 10:14:05
  14 Mar 15 10:14:05

  use Date::Parse;
  my $local_time = "Sat Mar 14 10:14:05 EDT 2015";
  # 1426342445 will be stored in $unix_time
  my $unix_time = str2time($local_time);

</div>

Date:Parse 模块支持多种语言(英语,法语,德语和意大利语)和时区。例如:

  use Date::Parse;
  use Date::Language;
  my $lang = Date::Language->new('French');
  my $unix_time = $lang->str2time("12:14:05, Ago 16, 2014 (CEST)");

</div>

Perl中UNIX时间戳到易读的日期和时间

如果你想要转换UNIX时间戳到易读的格式,可以使用localtime()函数,此函数可以转换UNIX时间戳为一个9元素列表。然后你可以使用返回的list构造任何你需要的可读格式。这里有一个代码片段:

  # $sec, $min, $hour: 秒,分,时
  # $mday: 月中的某天 (0-31)
  # $mon: 月份,范围 0 (一月) 至 11 (十二月)
  # $year: 年份,与1900年的差值(2015年为2015-1900=115)
  # $wday: 星期,范围 0 (星期天) 至 6 (星期六)
  # $yday: 年中的某天,范围 0 至 364 (或 365 闰年)
  # $isdst: 是否是夏令时
  my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime($unix_timestamp);
  # necessary conversion of $mon and $year
  $mon += 1;
  $year += 1900;
  print "Current time: $year-$mon-$mday $hour:$min:$sec\n";

</div>

</div>

您可能想查找下面的文章:

  • 讲Perl中的本地时间与UNIX时间戳间相互转换的方法

相关文章

  • perl实现的两个文件对比并对数据进行筛选的脚本代码
  • perl比较两个文件字符串的实例代码
  • Perl模块编写说明
  • Perl批量下载Gmail附件的代码
  • 使用 use re debug 查看正则表达式的匹配过程
  • Perl中chomp和chop的区别介绍
  • Perl中的控制结构学习笔记
  • perl查找进程PID的例子
  • perl文件包含(do,require,use)指令介绍
  • perl中使用signal(信号)实例

文章分类

  • vbs
  • DOS/BAT
  • hta/htc
  • python
  • perl
  • VBA
  • ColdFusion
  • ruby
  • PowerShell
  • Lua
  • Golang
  • linux shell

最近更新的内容

    • perl常量、多维数组及变量的初始化的实例代码
    • perl 中文处理技巧
    • perl 标量和运算符的一些知识介绍
    • Perl 哈希的创建和引用介绍
    • perl 基本语法介绍
    • Perl合并文本的一段实例代码
    • 通过perl实现一个简单的NIDS
    • perl中单行注释和多行注释使用介绍
    • perl批量查询ip归属地的方法代码
    • 学习perl的unless控制结构

关于我们 - 联系我们 - 免责声明 - 网站地图

©2020-2025 All Rights Reserved. linkedu.com 版权所有